Есть ли код г, который дает вывод дискретного линейного графика?

Question

Я хочу представить дискретный линейный график, похожий на это изображение в коде r, пожалуйста, помогите мне. принять любые значения.

Вещи, которые я пробовал, и набор данных здесь

bus.stop<-c("Polic Chowk","Regional bus stand","hospital", "Alanpura", "Housing Colony", "PG College", "Ranthambore circle" , "Railway station", "Collectorate", "New Bus stand")

boarding<-c(18,9,15,3,7,1,1,0,0,0)
alighting<-c(0,3,7,5,8,1,13,8,5,4)
load<-c(18,24,38,32,29,27,23,11,4,0)

hous.oton<-data.frame("BusStop" = bus.stop, "Boarding" = boarding, "Alighting"=alighting, "Load"=load)

plot(hous.oton$BusStop,hous.oton$Boarding, type="s")
```

Answer 1

Если вы просто хотите нарисовать пошаговый линейный график, вы, вероятно, можете получить его с помощью пакета ggplot2:

library(ggplot2)
ggplot(hous.oton, aes(x=BusStop, y=Boarding, group=1)) + geom_step()

Вам нужно указать group = 1, потому что у вас только одно наблюдение на автобусную остановку.

Для получения дополнительной информации см., Например, Создание кумулятивного графа шагов в R .