代码之家 › 专栏 › 技术社区 › John Thomas

将NA从切割更改为值

na dplyr ggplot2 r

John Thomas · 技术社区 · 4 年前

所以我有这样的数据。

d <- structure(c(NA, 1L, 1L, 4L, NA, NA, NA, 1L, 4L, 1L), .Label = c("[1,8]", 
"(8,29]", "(29,105]", "(105,738]"), class = "factor")

0 然后策划。

library(ggplot2)

ggplot(data = data.frame(var = d)) +
  geom_bar(aes(x = d), fill = "cornflowerblue")

但是我试着用下面的方法,但它不起作用。。。

d <- ifelse(is.na(d) == FALSE, "0", d)

0 回复 | 直到 4 年前

Darren Tsai 4 年前

试试这个。

levels(d) = append(levels(d), 0)
d[is.na(d)] = 0
ggplot(data = data.frame(var = d)) + geom_bar(aes(x=d), fill="cornflowerblue")

dspn 4 年前

有几个问题:

is.na(d) == FALSE !is.na(d) 但是既然你想转换NA,你就不想否定它

第二,你有一些问题,因为因素与其他因素混合在一起。

你可以通过

d <- levels(d)[d]

然后可以使用删除NAs

d <- ifelse(is.na(d), "0", d)

如果你最终可以做一个变量:

d <- factor(d, ordered = TRUE, levels = c("0", "[1,8]", "(8,29]", "(29,105]", "(105,738]"))

Darren Tsai 4 年前

base 解决方案 addNA()

d <- `levels<-`(addNA(d), c(levels(d), "0"))

#  [1] 0   [1,8]   [1,8]   (105,738]   0   0   0   [1,8]   (105,738]   [1,8]    
# Levels: [1,8] (8,29] (29,105] (105,738] 0

forcats

d <- forcats::fct_explicit_na(d, "0")

#  [1] 0   [1,8]   [1,8]   (105,738]   0   0   0   [1,8]   (105,738]   [1,8]    
# Levels: [1,8] (8,29] (29,105] (105,738] 0

再来一次

ggplot(data = data.frame(var = d)) +
  geom_bar(aes(x = var), fill = "cornflowerblue")

根据你的评论,你可以 "0"

( forcats::fct_relevel() 比 stats::relevel()

ggplot(data = data.frame(var = relevel(d, "0"))) +
  geom_bar(aes(x = var), fill = "cornflowerblue")

推荐文章

monotonic · 如何将格式为“col1+col3+col4”的数据帧的行名转换为一列数字向量“c(1,3,4)”?

2 年前

buzz · 在dplyr包中,可以根据不同列中的值对列进行变异吗

2 年前

Artur Vidaurre de Almeida · 用R列中的下一个值替换NA值

2 年前

Rich · 如何通过比较R中的两列来计算不同的值?

2 年前

J.Sabree · case\u when在使用group by时忽略一些参数

2 年前

cigarettes_after_text · 有没有一种方法可以更高效地将其写入单个Dplyr语句?

2 年前

Melderon · 将dplyr转换命令转换为基R函数

3 年前

Rafael Peixoto · 熊猫有什么类似于dplyr的“列表列”的吗

3 年前

awoj · 使用pivot\u wider()时修改列名顺序

3 年前

John Thomas · 使用tidyverse/dplyr[duplicate]创建虚拟变量作为计数

3 年前