0

someDatユーザーの登録日を表示するという次のデータセットがあります。

     dates  users
11/06/2013  alfred
12/06/2013  andrew
12/06/2013  john
15/06/2013  jojo
15/06/2013  jeff
15/06/2013  samson
18/06/2013  dave
18/06/2013  hamsa
19/06/2013  kambua

画像に示すように、日付と累積ユーザー数をプロットしたいと思います。usersを因子に変換してから関数を使用しようとしましたcumsumが、正しいグラフが得られません。

usersSum <- cumsum(as.numeric(factor(someDat$users))); usersSum
plot(someDat$date,someDat$users, type= "b")

どこが間違っているのか、使用するのに適した機能なのかどうかわかりません。どんな助けでも大歓迎です。

ここに画像の説明を入力

4

1 に答える 1

2
someDat <- read.table(text='     dates  users
11/06/2013  alfred
12/06/2013  andrew
12/06/2013  john
15/06/2013  jojo
15/06/2013  jeff
15/06/2013  samson
18/06/2013  dave
18/06/2013  hamsa
19/06/2013  kambua',header=TRUE)
someDat$cumsum <- 1:nrow(someDat)
someDat$date2 <- as.POSIXct(as.character(someDat$dates),format='%d/%m/%Y')
# as lines (left plot)
plot(someDat[!duplicated(someDat$dates, fromLast=TRUE),c('date2','cumsum')],type='l')
# as steps (right plot, following DWin)
plot(someDat[!duplicated(someDat$dates, fromLast=TRUE),c('date2','cumsum')],type='l')

ここに画像の説明を入力 ここに画像の説明を入力

于 2013-10-21T07:56:08.387 に答える