数据点少于两个的组已被删除。 ggplot r

时间:2018-07-16 18:50:23

标签: r ggplot2

几周前,我在r中绘制了一个ggplot密度图。 效果很好。然后昨天,我再次访问并运行了相同的代码。 代码主体绝对没有改变(仅改变了Rmarkdown格式,例如改变了文本的字体大小,echo = FALSE等)。我只是重新运行了相同的代码,并且由于某种原因它不起作用

以下是数据集的代码:

m_hospitals = m_hospitals %>% group_by(Provider.Name) %>% summarise(accSum = 
sum(Average.Covered.Charges), atpSum = sum(Average.Total.Payments), ampSum = 
sum(Average.Medicare.Payments), accMean = mean(Average.Covered.Charges), 
atpMean = mean(Average.Total.Payments), ampMean = 
mean(Average.Medicare.Payments)) 

#Take a sample
set.seed(1219)
sample_m_hospitals = m_hospitals[sample(nrow(m_hospitals), 30), ]

以下是该绘图的代码,该代码以前可以使用,但现在不再可用:

ggplot(data = sample_m_hospitals) +
aes(x = Provider.Name, y = accMean) + 
geom_density(alpha = .75) + theme(axis.text.x = element_text(angle = 45, 
hjust = 1))

这是给我的消息,“删除了少于两个数据点的组” * 30。 的确,30行中的每行只有1个观察值,因为它们是汇总的。有趣的是,该消息之前没有弹出,没有删除任何数据点并且运行良好。我什至有截取剧本所用的屏幕截图。这是链接:1

我感到可疑的一项更改是,它更新了R(重新绘图之前已更新,版本3.5.0> 3.5.1),这删除了所有必须重新安装的库。但是我不确定此更新是否与该问题有关。它工作正常,但是为什么突然不工作呢?我不懂..请帮忙!我只是想以类似的形式绘制此图。

内容根据您的评论更新:

devtools :: session_info()的屏幕截图 23

sample_m_hospitals的屏幕截图 45

1 个答案:

答案 0 :(得分:0)

我有一个类似的问题,可以通过转换列来解决。数字列将作为字符串导入。