Min Max R Getmode 数据集

Question

这是对我之前提出的另一个问题的跟进。我有解决方案，但需要帮助添加最后一部分。

library(plyr)

getmode<- function(origtable,groupby,columnname) {
    data <- ddply (origtable, groupby, .fun = function(xx){
      c(m1 = paste(names(sort(table(xx[,columnname]),decreasing=TRUE)[1]))) 
      } ) 
    return(data)
}

getmode(df,c("CreditCardType","Bank","Year"),"TotalBalance")

df<-read.table(text="CreditCardType  Bank   Year   TotalBalance
               MASTERCARD       BOFA   2017   $100
               MASTERCARD       BOFA   2017   $100
               MASTERCARD       BOFA   2017   $700
               VISA              Wells  2018   $60 
               VISA              Wells  2018   $50
               VISA              Wells  2018   $60",
               header=T, stringsAsFactors=F)

这让我找到了我正在寻找的模式！但是我也需要最小值和最大值，并且

没有任何“Getmin”或“Getmax”

有什么想法吗？？

提前致谢！@

Answer 1

像这样...？

> df %>% 
    group_by(CreditCardType, Bank, Year) %>% 
    summarise(Min=min(TotalBalance), 
              Max=max(TotalBalance))
# A tibble: 2 x 5
# Groups:   CreditCardType, Bank [?]
  CreditCardType Bank   Year   Min   Max
  <chr>          <chr> <int> <dbl> <dbl>
1 MASTERCARD     BOFA   2017   100   700
2 VISA           Wells  2018    50    60