假设我有一个两个单词的字符串,我想大写

name <- c("zip code", "state", "final count")

Hmisc软件包有一个函数capitalize,首字母大写,但我不确定

library(Hmisc)
capitalize(name)
# [1] "Zip code"    "State"       "Final count"

我想得到:

c("Zip Code", "State", "Final Count")

那么三个字符串呢:

name2 <- c("I like pizza")

推荐答案

执行大小写的基本R函数是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" 

Edit这适用于任何字符串,不考虑字数:

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

R相关问答推荐

提取具有连续零值的行,如果它们前面有R中的有效值

从所有项的 struct 相同的两级列表中,将该第二级中的所有同名项绑定在一起

在RStudio中堆叠条形图和折线图

将. xlsx内容显示为HTML表

以NA为通配符的R中的FULL_JOIN以匹配其他数据中的任何值.Frame

具有重复元素的维恩图

如何根据R中其他变量的类别汇总值?

正在导出默认的RStudio主题,还是设置括号 colored颜色 ?

如何移动点以使它们的打印不重叠

生存时间序列的逻辑检验

分隔日期格式为2020年7月1日

从矩阵创建系数图

如何编辑被动式数据表?

在不带max()的data.table中按组查找最后一个元素

如何捕获这个shiny 的、可扩展的react 性用户输入矩阵作为另一个react 性对象,以便进一步操作?

图中显示错误 colored颜色 的图例geom_sf

如何使用包含要子集的值的列表或数据框来子集多个列?

相同的代码(使用R';S dplyr、stringr和sf)在使用不同的包版本时会产生不同的结果

如何计算前一个日期窗口的平均值?

有没有一种方法可以基于两个条件和现有的时间变量来创建时间值?