LL Golf Hole 2 - 文字列に含まれる単語の最初の文字を大文字にする
Posted feedbacks - R
Rは文字列操作が苦手です。
1 2 3 | capword <- function(str){
sapply(strsplit(str, " "), function(s)(paste(toupper(substring(s,1,1)), substring(s,2), sep="", collapse=" ")))
}
|
うーん、これで勘弁してください・・・
1 | gsub("\\b(.)", "\\U\\1", "LL day and night", perl=TRUE)
|
正規表現を使ったものには全然かないませんが。 空白を単語の区切りとしています。 文字列は標準入力で与えます。
1 2 3 4 5 | a=strsplit(readLines("stdin"),"")[[1]]
i=c(T,a==" ")
a=c(a,"")
a[i]=toupper(a[i])
cat(a,"\n",sep="")
|





takano32
#6901()
[
Ruby
]
Rating2/10=0.20
文字列に含まれる単語について、それぞれの単語の最初の文字を大文字にしてください。
たとえば、"LL future" と与えられたときは "LL Future" と出力する。"LL day and night" と与えられたときは "LL Day And Night" と出力する。
与えられる文字列はリテラルで表記する、標準入力で与えられる、引数で与えられるなどは自由とします。
余力のあるものはこのプログラムを短くしてみたり、短くしてみたり、短くしてください。
※LL Future実行委員の高野光弘です。この出題は LL Future公式の出題であり、優れたものについてはLL Golfのセッションでご紹介させていただくかもしれません。ご理解の上、ご投稿ください。また、LL Futureのチケットは現在も発売中です。よろしければ、メインイベントの方にもぜひご参加ください。
see: LL Golf
Rating2/10=0.20-0+
[ reply ]