当使用ggplot进行刻面时,并且在不正确的构面窗口中绘制点。我该如何解决这个问题?

时间:2016-07-12 20:35:20

标签: r ggplot2 shiny plotly facet

我有一个闪亮的应用程序,用于绘制从我们公司数据库查询的数据。您可以根据数据框中的不同列选择构图。我正在使用facet_grid和两个selectInputs来从侧面,顶部或两者进行构面。我也在构建一个ggplot对象,然后使用plotly_build制作一个有光泽的情节图。我试图通过切面serialnumber ~ serialnumber来解决闪亮应用之外的问题。

我希望看到在小平面窗口对角线上绘制点,但是它只是在第一列中一直在绘制。这是我有趣绘制的代码。我已经更改了所有数据,因为它很敏感。这只是它在许多其他表型中呈现的一个例子。也很抱歉轴标签的混乱,我只是试图看看我是否可以解决问题,而不是使它看起来漂亮。如果您还需要更多信息,请告诉我?

gg_color_hue <- function(x){
  hues = seq(15,375, length = x+1)
  hcl(h = hues, l = 65, c = 100)[1:x] 
}

ggplot(data= queryData, aes(x = AssayName, y = Metric, colour = SerialNumber)) +
 scale_colour_manual(values = gg_color_hue(length(unique(queryData$SerialNumber))),name = "SerialNumber") +
 facet_grid(SerialNumber ~  SerialNumber) +
 geom_point(size = 2) + 
 theme_set(theme_gray(base_size = 12)) +
 theme(axis.text.x = element_text(angle = 90, hjust = 2)) +
 labs(title = 'all assay') +
 xlab(paste("assays")) + 
 ylab("metric") +
 scale_y_continuous(limits = c(0, 32),
                 breaks = (seq(0,32, by = 5)))

Plot Data Frame

0 个答案:

没有答案