首頁猿問將兩個(gè)單詞的第一個(gè)字母大寫為兩個(gè)單...

將兩個(gè)單詞的第一個(gè)字母大寫為兩個(gè)單詞的字符串

R語言

侃侃爾雅 2019-08-16 16:11:00

將兩個(gè)單詞的第一個(gè)字母大寫為兩個(gè)單詞的字符串假設(shè)我有一個(gè)兩個(gè)單詞的字符串，我想把它們都大寫。name <- c("zip code", "state", "final count")這個(gè)Hmisc包有一個(gè)capitalize大寫第一個(gè)單詞的函數(shù)，但我不確定如何將第二個(gè)單詞大寫。幫助頁面capitalize并不表示它可以執(zhí)行該任務(wù)。library(Hmisc)capitalize(name)# [1] "Zip code" "State" "Final count"我想得到：c("Zip Code", "State", "Final Count")三字串怎么樣：name2 <- c("I like pizza")

查看完整描述

3 回答

江戶川亂折騰

TA貢獻(xiàn)1851條經(jīng)驗(yàn) 獲得超5個(gè)贊

執(zhí)行大寫的基本R函數(shù)是toupper(x)。從幫助文件中可以找到?toupper您需要的功能：

simpleCap <- function(x) {
  s <- strsplit(x, " ")[[1]]
  paste(toupper(substring(s, 1,1)), substring(s, 2),
      sep="", collapse=" ")}name <- c("zip code", "state", "final count")sapply(name, simpleCap)

     zip code         state   final count 
   "Zip Code"       "State" "Final Count"

編輯適用于任何字符串，無論字?jǐn)?shù)如何：

simpleCap("I like pizza a lot")[1] "I Like Pizza A Lot"

反對(duì) 回復(fù) 2019-08-16

偶然的你

TA貢獻(xiàn)1841條經(jīng)驗(yàn) 獲得超3個(gè)贊

匹配從開頭^或開頭后開始的正則表達(dá)式，[[:space:]]后面跟一個(gè)字母字符[[:alpha:]]。全局（gsub中的g）用匹配的開頭或空格以及匹配的字母字符的大寫版本替換所有這些出現(xiàn)\\1\\U\\2。這必須使用perl風(fēng)格的正則表達(dá)式匹配來完成。

gsub("(^|[[:space:]])([[:alpha:]])", "\\1\\U\\2", name, perl=TRUE)# [1] "Zip Code"    "State"       "Final Count"

在替換參數(shù)的更多細(xì)節(jié)中gsub()，\\1說'使用x匹配第一個(gè)子表達(dá)式的部分'，即x匹配的部分(^|[[:spacde:]])。同樣，\\2說使用x匹配第二個(gè)子表達(dá)式的部分([[:alpha:]])。的\\U是使用支持語法perl=TRUE和手段，使下一個(gè)字符大寫。因此對(duì)于“郵政編碼”，\\1是“Zip”，\\2是“代碼”，\\U\\2是“代碼”，并且\\1\\U\\2是“郵政編碼”。