代码之家 › 专栏 › 技术社区 › kittygirl

“factor”或“as.factor”的结果不同?

kittygirl · 技术社区 · 6 年前

设置数据帧如下:

df <- data.frame(
    cola = c('a','b','c','d','e','e','1',NA,'c','d'),
    colb = c("A",NA,"C","D",'a','b','c','d','c','d'),stringsAsFactors = FALSE)
cats<-c('a','b','c','d','e','f','1')

然后,快跑 df['cola'] <- lapply(df['cola'], function(x) factor(x,levels=cats,exclude = NULL,ordered = FALSE,nmax=6)) ,得到了预期的结果。

如果 factor 到 as.factor on this post ,运行 df['cola'] <- lapply(df['cola'], function(x) as.factor(x,levels=cats,exclude = NULL,ordered = FALSE,nmax=6))

Error in as.factor(x, levels = cats, exclude = NULL, ordered = FALSE,  : 
  unused arguments (levels = cats, exclude = NULL, ordered = FALSE, nmax = 6)

有什么问题吗?

1 回复 | 直到 6 年前

Ronak Shah 6 年前

问题如错误消息中所述。你所传递的论据对我来说是不存在的 as.factor . 如果你阅读 ?as.factor 您可以看到只是 x . levels , exclude , ordered , nmax 是支持 factor 而不是 as.系数

如果删除这些参数并运行该函数,则该函数不会出现任何错误消息。

lapply(df['cola'], function(x) as.factor(x))
#$cola
# [1] a    b    c    d    e    e    1    <NA> c    d   
#Levels: 1 a b c d e

或者只是

lapply(df['cola'], as.factor)

如果你只有一个专栏,就不需要 lapply

as.factor(df$cola)

推荐文章

Amp · 使用R ggplot2删除geom_radial中axis.line和panel.border之间的空格

5 月前

Hard_Course · 用另一列中的值替换行的最后一个非NA条目

5 月前

Mark R · 使用geom_sf()删除地球仪上不需要的网格线

5 月前

Joe · 根据对工作日和本周早些时候的日期的了解,找到一个日期

6 月前

Ben · 统计向量中的单词在字符串中出现的频率

6 月前

TheCodeNovice · R中符号格式的尾随零和其他问题[重复]

6 月前

katefull06 · 在R中使用terra修改范围时,会为单独的SpatRaster重写范围

6 月前

dez93_2000 · 在R管道子功能中引用管道对象的当前状态

6 月前

accibio · 在ggplot2中为同一变量创建两个连续的颜色渐变比例

6 月前

Mankka · 如何在Ggplot2中绘制均匀的径向图

6 月前