geom_col에서 색상 채우기를 주문하는 방법은 무엇입니까?

안녕하세요, 저는 geom_col의 X 축 값의 순서를 변경하고 factor () 및 scale_x_discrete () 함수를 사용하여 작동했지만 동시에 색상 순서가 변경되었습니다.

colors <- c("#f2f0f7", "#dadaeb", "#bcbddc", "#9e9ac8", "#756bb1", "#54278f")    
positions <- c("P1", "P8", "P3", "P4", "P5", "P6")
positions <- factor(positions, levels = c("P1", "P8", "P3", "P4", "P5", "P6")) # order on legend

ggplot() + 
  scale_x_discrete(limits = positions) + 
  geom_col(data=a, aes(x = X, y = M, fill = positions), width = 0.75, position = position_dodge(0.1), colour = "black", size = 0.9) +
  labs(title = paste(Rname, Tname, sep = " ")) + xlab(Rname) + ylab(Tname) +
  coord_cartesian(ylim = c(0, NA)) +
  geom_errorbar(data=a, aes(x = X, y = M, ymin = M, ymax = max), width=0.5, size=1) +
  scale_fill_manual(values = colors, breaks = positions) + 
  scale_y_continuous(expand=c(0,0), limits = c(0,max(df2$Y, na.rm = TRUE)*1.05)) + 
  
  theme_set(theme_classic(base_size = 30, base_family = "Helvetica", base_line_size = 1)) +
  theme(
    aspect.ratio = 5/4,
    axis.line.y.left = element_line(),
    
    axis.text = element_text(hjust = 1, color = "black"),
    axis.text.x = element_text(angle=45),
    axis.text.y = element_text(angle=0),
    
    axis.title.x.bottom = element_text(size = 22, angle=0, margin = margin(t=20)),
    axis.title.y = element_text(size = 22, angle=0, margin = margin(r = 20), vjust = 0.5),
    plot.title = element_text(size = 30, margin = margin(b = 30), hjust = 0.5 ),
    
    axis.ticks.y = element_line(),
    axis.ticks.length.y = unit(10,"pt"), 
  )

scale_fill_manual에서 색상 순서를 변경하여 다시 정상으로 변경했습니다.

scale_fill_manual(values = c("#f2f0f7", "#bcbddc", "#9e9ac8", "#756bb1", "#54278f", "#dadaeb"), breaks = positions) + 

하지만 범례 색상 순서를 엉망으로 만들었습니다. 플롯과 범례 모두에서 x 축과 색상 순서가 모두 유지되는 올바른 방향으로 나를 안내해 주시겠습니까?