由于输入变量逗号中的格式，汇总中不适用

编程问答 2022-06-08

问题描述

我正在尝试总结一个用逗号格式化inegers的变量，因为该摘要不合适，而且我也得到了NA。.我尝试了以下代码

Prv_mnth_so1 <- data.frame(lapply(Prv_mnth_so,trimws))
colnames(Prv_mnth_so1) <- c("GST_ward","Category","order_and_section","combo","Product_Number","Orders_Status","Option_Number","SRN","Quantity_On_Hand","Invoice_Or_Billing_Id","Lc_Amount","Clearance_date")
Prv_mnth_so1$state <- sub("\\-.*","",Prv_mnth_so1$GST_ward)
Prv_mnth_so1$Lc_Amount <- sub(",",Prv_mnth_so1$Lc_Amount)

Prv_mnth_so1$Option_Number <- sub("^$","NOT",Prv_mnth_so1$Option_Number )
Prv_mnth_so2 <- Prv_mnth_so1[is.na(Prv_mnth_so1$Option_Number) | Prv_mnth_so1$Option_Number=="",]
Prv_mnth_so3 <- Prv_mnth_so1 %>% 
                  filter(Clearance_date != "Not Cleared as on May 31,2020",Option_Number == "NOT" )

Prv_mnth_so3$Quantity_On_Hand <- as.numeric(as.character(Prv_mnth_so3$Quantity_On_Hand))
Prv_mnth_so3$Lc_Amount <- as.numeric(Prv_mnth_so3$Lc_Amount)
Prv_mnth_soqty <- Prv_mnth_so3 %>%
                    filter( Category== "ESC") %>%
                    group_by (state,Product_Number) %>%
                    summarise(qty = sum(Quantity_On_Hand))
                    #arrange(state,Product_Number)
Prv_mnth_so_esc_amt <- Prv_mnth_so3 %>%
                        filter( Category== "ESC") %>%
                        group_by (state,Product_Number) %>%
                        summarise(esc = sum(as.numeric(Lc_Amount))) %>%
                        arrange(state,Product_Number)
Prv_mnth_so_lom_amt <- Prv_mnth_so3 %>%
                        filter( Category== "LOM") %>%
                        group_by (state,Product_Number) %>%
                        summarise(lom = sum(Lc_Amount))%>%
                        arrange(state,Product_Number)
Prv_mnth_si <- merge(Prv_mnth_soqty,Prv_mnth_so_esc_amt,Prv_mnth_so_lom_amt,by.x = c("state","Product_Number"),by.y = c("state",by.z = c("state",

应用了as.character和as.numeric + import选项后，Prv_mnth_soqty正确了，但是Prv_mnth_so_lom_amt没有给出正确的摘要并显示了NA

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

dplyrnasrrsummary