在ggplot的一個方面內按組分隔geom_linerange

Question

假設我有以下數據：

test = read.table(text = 'condition1 condition2 estimate std_error name
a x .466 .09 name_1
a y .343 .131 name_1
b x .466 .09 name_1
b y .343 .131 name_1
a x .466 .09 name_2
a y .343 .131 name_2
b x .466 .09 name_2
b y .343 .131 name_2', header = T, stringsAsFactors = T)


ggplot(data = test, aes(x = estimate, y = condition1, fill = condition2, group = condition2)) +
    geom_point(color = 'black') +
    geom_linerange(aes(xmin = estimate - std_error,
                       xmax = estimate + std_error), color = 'black') +
    ylab(NULL) +
    facet_grid(name ~ .,
               scales = "free_y",
               space = "free_y",
               switch = 'y')

我試圖分離出x和y線作為內單獨的行b與a條件within一個給定的小刻面（ name_1和name_2 ）。 但是我的代碼原樣將這兩行作為相同的 y 值，所以它們是重疊的。 分隔線的最佳方法是什么？

Answer 1

根據口味調整width = X

...
 geom_point(color = 'black', position = position_dodge(width = 1)) +
  geom_linerange(aes(xmin = estimate - std_error,
                     xmax = estimate + std_error), color = 'black',
                     position = position_dodge(width = 1)) +
...

或者在這里進行一些更多的美學調整：

ggplot(data = test, aes(x = estimate, y = condition1, fill = condition2, group = condition2)) +
  geom_linerange(aes(xmin = estimate - std_error,
                     xmax = estimate + std_error), color = 'black',
                 position = position_dodge(width = 0.5)) +
  geom_point(color = 'black', size = 2, shape = 21, position = position_dodge(width = 0.5)) +
  ylab(NULL) +
  facet_grid(name ~ .,
             scales = "free_y",
             space = "free_y",
             switch = 'y') +
  theme(panel.grid.major.y = element_blank())