如何在barplot中添加条件？

Question

我想外地公司名称的那些数量> 40

注：daots2（我的表）是可变的

barplot(daots2$QUANTITY[daots2$UNITPRICE > 40], names.arg = daots2$CompanyName, 
    beside = F, ylab = 'Frecuency' , main = 'Cantidad') 

enter image description here

这是我的数据enter image description here

Answer 1

我会建议使用您的数据子集dplyr：

# install.packages("dplyr") 
library(dplyr) 

以下将给出所有UNITPRICE的总和的QUANTITY即> 40。

plotData <- daots2 %>% 
        filter(UNITPRICE > 40) %>% 
        summarise(quantSum = sum(QUANTITY)) 

下面将为您公司为其UNITPRICE是> 40数量的计数。

plotData <- daots2 %>% 
        filter(UNITPRICE > 40) %>% 
        summarise(uniqueCompany = n_distinct(ProductName))