2014-04-02 77 views
0

我正在制作一个应用程序,使用闪亮的包进行R数据分析。动态为barplot选择颜色

我在为barplot函数提供color属性的值时遇到了问题。我从用户采取两列,我正在应用函数nvalues,为默认颜色做技巧...但是如果我想有我自己的自定义颜色阵列,并根据列的要求使用其中的一部分。

这里是我的闪亮的文件

shinyServer(function(input, output) { 
    output$myplot<-renderPlot({   
    c1<-input$cname1 
    c2<-input$cname2 
    clm1<-smpl[,c1] 
    clm2<-smpl[,c2] 
    counts<-table(clm1,clm2) 
    View(counts) 
    n<-nlevels(clm1) 
    barplot(counts,beside=TRUE,col=c(1:n),legend = rownames(counts))      
    }) 
}) 
+0

这是不是很清楚你在这里问什么。你是否要求在一系列颜色中进行选择? – Thomas

+0

我在问,如果计数有n个水平,则应从我定义的颜色矢量中选择n种颜色,而不是选择该矢量中的所有颜色。 – apps92

回答

0

与所有base绘图功能,指定颜色的载体,你的愿望。

barplot(some_data,col=c('red','orange','yellow','green','blue')) 

barplot(some_data,col=rainbow(10)) 

等。 col矢量可根据需要进行回收。

+0

如果列中的级别小于向量,该怎么办?它将它用于barplot中的下一个子组。那么不好 – apps92

+0

@ apps92然后指定索引,例如, 'COL =彩虹(10)[1:N]' –