Я пытаюсь построить гистограмму, используя ggplot.
Мои данные (называемые tbl.Profile) имеют вид:
Date Var1 Var2 Profile
2018-06-30 0.007372125 0.05685546 3.707403
2018-07-31 0.007347875 0.05772672 3.748892
2018-08-31 0.007430875 0.05813464 3.768316
2018-09-30 0.007180375 0.05752347 3.739213
2018-10-31 0.007345375 0.05759545 3.742641
2018-11-30 0.009492750 0.06120531 3.914539
2018-12-31 0.009492750 0.06120531 3.914539
2019-01-31 0.009542625 0.06131689 3.919852
2019-02-28 0.009500625 0.06114296 3.911570
2019-03-31 0.008996250 0.05987258 3.851075
2019-04-30 0.009090625 0.06005683 3.859849
2019-05-31 0.009026125 0.05941847 3.829451
2019-06-28 0.008971750 0.05933657 3.825551
Я использую Tidyverse;ниже мой код:
tbl.Profile %>%
select(Date, Profile) %>%
ggplot(aes(x = Date, y = Profile), width = 25) +
geom_bar(stat = "identity")`
Вывод, который я получаю, выглядит следующим образом:
Что я делаю не так?Я не могу сделать бары шире, хотя я даю width =