取消列表名并在facet_grid中使用它

Question

我有一长串列名，我想在this.myService.createFoo(data).subscribe( (result: any) => { resolve({success: true, data: result}); }, err => { resolve({success: false, message: err}); }); this.myService.updateFoo(data).subscribe( (result: any) => { resolve({success: true, data: result}); }, err => { resolve({success: false, message: err}); }); 中使用它。我想选择一些列名并将facet_grid作为+函数require。

我已尝试使用facet_grid，但无法弄清楚为什么mtcars或unlist无效。

paste

  

combine_vars出错（数据，参数$ plot_env，cols，drop = params $ drop）   ：至少一个图层必须包含用于构图的所有变量

Answer 1

您可以在facet_grid内使用字符串，但必须将整个公式（包括代字号）作为字符串提供。

names <- paste(c(". ~ ", names(mtcars)[c(1,3,5)]), collapse='+')

ggplot(mtcars, aes("", hp)) + 
  geom_boxplot(width=0.7, position=position_dodge(0.7)) + 
  theme_bw() +
  facet_grid(names, switch = 'both', labeller = label_both)