我想可視化每個產品類別的銷售數量（下表的第二列）并添加代表市場份額百分比的行（第三列） 表 我使用 sec_axis 函式來調整第二個軸的比例，但似乎資料不想與它連接，它仍然在第一個軸刻度上運行。
tabela %>% ggplot()
geom_col(aes(x =`Przedzia? Cenowy`, y = `Sprzedaz przypadaj?ca na jeden tytu? `),
fill = "blue", alpha = .4)
geom_point(aes(x =`Przedzia? Cenowy`, y = `Liczba Sprzedanych Kopii / Ca?kowit? sprzeda? [%]`), color= "red")
geom_line(aes(x =`Przedzia? Cenowy`, y = `Liczba Sprzedanych Kopii / Ca?kowit? sprzeda? [%]`), color= "red")
scale_y_continuous(sec.axis = sec_axis(~./2800, name = "Procent"))
運行代碼根據需要使用正確的單位添加第二個軸，應該允許可視化百分比市場份額，但點和線看起來仍然在第一個軸上運行。
圖表結果
當我改變時，ylim=c(0,150)它看起來像
改變了 ylim
所以對我來說，顯然點和線仍然在第一個而不是第二個軸上運行。我怎么能修好呢？
uj5u.com熱心網友回復：
您需要sec_axis通過用于創建該軸的比例因子的倒數來縮放應該出現在 上的資料。所以你的代碼應該是：
tabela %>%
ggplot()
geom_col(aes(x =`Przedzia? Cenowy`,
y = `Sprzedaz przypadaj?ca na jeden tytu? `),
fill = "blue",
alpha = .4)
geom_point(aes(x =`Przedzia? Cenowy`,
y = 2800*(`Liczba Sprzedanych Kopii / Ca?kowit? sprzeda? [%]`)),
color= "red")
geom_line(aes(x =`Przedzia? Cenowy`,
y = 2800*(`Liczba Sprzedanych Kopii / Ca?kowit? sprzeda? [%]`)),
color= "red")
scale_y_continuous(sec.axis = sec_axis(~./2800, name = "Procent"))
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/394679.html
下一篇：在組內創建具有恒定值的亂數