我有mixed dataframe个字符和数字变量.

city,hs_cd,sl_no,col_01,col_02,col_03
Austin,1,2,,46,Female
Austin,1,3,,32,Male
Austin,1,4,,27,Male
Austin,1,5,,20,Female
Austin,2,2,,42,Female
Austin,2,1,,52,Male
Austin,2,3,,25,Male
Austin,2,4,,22,Female
Austin,3,3,,30,Female
Austin,3,1,,65,Female

我想把数据框中的所有小写字符转换成大写.有没有办法在一次拍摄中做到这一点,而不必在每个字符变量上重复这样做?

推荐答案

从以下示例数据开始:

df <- data.frame(v1=letters[1:5],v2=1:5,v3=letters[10:14],stringsAsFactors=FALSE)

  v1 v2 v3
1  a  1  j
2  b  2  k
3  c  3  l
4  d  4  m
5  e  5  n

你可以使用:

data.frame(lapply(df, function(v) {
  if (is.character(v)) return(toupper(v))
  else return(v)
}))

它给出:

  v1 v2 v3
1  A  1  J
2  B  2  K
3  C  3  L
4  D  4  M
5  E  5  N

R相关问答推荐

这两种创建S4对象的方法有何不同?

如何替换某个字符的所有出现,但如果该字符是字符串中的第一个,则不替换?

多个ggpredicate对象的平均值

单击 map 后,将坐标复制到剪贴板

如何自定义Shapviz图?

在R中替换函数中的特定符号

如何直接从R中的风险分数计算c指数?

如何优化向量的以下条件赋值?

如何根据嵌套元素的名称高效而优雅地确定它属于哪个列表?

R—将各种CSV数字列转换为日期

合并后返回列表的数据帧列表

使用RSelenium在R中抓取Reddit时捕获多个标签

如何平滑或忽略R中变量的微小变化?

有没有办法定制Plot(allEffects())面板标题?

如何根据未知数的多列排除重复行

无法将条件case_when()应用于使用!!创建的新变量Mutations

如何构建一个for循环来循环处理动物ID?

R预测包如何处理ARIMA(Auto.arima函数)中的缺失值

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

在使用SliderInput In Shiny(R)设置输入数据的子集时,保留一些情节痕迹