2017-05-01 75 views
1

我有这样的代码,在RStudio 正常工作,但我不会在这个闪亮的 as.datatable()的光泽与renderFormattable不起作用[R formattable数据表,以闪亮的

它说:“因为没有适用的方法“为.htmlwidget”施加到类的对象 “C( '数据表', 'htmlwidget')”,”

server.R

输出$数据< -renderFormattable({

df1<-merge(happiness5[,c(1,3)], 
      happiness6[,c(1,3)], 
      by.x = "Country", 
      by.y = "Country") 
    colnames(df1)<-c("Country","Happiness Rank 2015","Happiness Rank 2016") 
    df1<-df1%>% 
    mutate(`Rank Change`=`Happiness Rank 2015`-`Happiness Rank 2016`) 


    formattable(df1,list(
    `Rank Change` = formatter(
     "span", 
     style=~formattable::style(color=ifelse(`Rank Change`>0,"green","red")))))%>% 
    as.datatable() 
},env = parent.frame(), quoted = FALSE) 

回答

2

更改renderFormattable(…)renderDataTable(…)

既然您将formattable转换为最后一行中的datatable,您需要告诉渲染器它必须处理datatable