以下是我的数据
Tue Feb 11 18:21:45 +0000 2014
Tue Feb 11 18:22:03 +0000 2014
Tue Feb 11 18:22:05 +0000 2014
每一行都是一个事件。我试图将这些数据绘制成直方图。
由于时间减少到几小时,几分钟和几秒钟,我有一周的数据。我的直方图箱需要基于天数。所以我可以看到实际的重大变化。
到目前为止,这是我的代码..
Time_Data <- read.csv("Twitter_Data_2.csv")
Time_Data_Strptime <- strptime(data[,1], format ="%a%b%d %I:%M:%S %z%y")
接着是
hist(x=Time_Data_Strptime[,1], breaks="hours")
我收到此错误:
lapply错误(X = x,FUN =&#34; [&#34;,...,drop = drop): 参数缺失,没有默认值
我是R studio的新手,所以非常感谢任何帮助或建议。
编辑:输入dput(head(Time_Data))
"Wed Feb 12 07:12:15 +0000 2014", "Wed Feb 12 07:12:55 +0000 2014",
"Wed Feb 12 07:13:48 +0000 2014", "Wed Feb 12 07:15:53 +0000 2014",
"Wed Feb 12 07:16:28 +0000 2014", "Wed Feb 12 07:20:11 +0000 2014",
"Wed Feb 12 07:20:39 +0000 2014", "Wed Feb 12 07:20:47 +0000 2014",
edit2:输入Time_Data_strptime
[1] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[42] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[83] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[124] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
edit3:来自Time_Data_strptime的样本
[1] "2014-02-11 23:19:56" "2014-02-11 23:20:04"
[3] "2014-02-11 23:21:06" "2014-02-11 23:21:15"
[5] "2014-02-11 23:21:30" "2014-02-11 23:22:02"
答案 0 :(得分:1)
这对我有用:
Time_Data <- read.table(text = "Tue Feb 11 18:21:45 +0000 2014
Tue Feb 11 18:22:03 +0000 2014
Tue Feb 11 13:22:05 +0000 2014", head = F, sep = ";", stringsAsFactors = F)
使用POSIXct
代替strptime
,因为有hist.POSIXct
方法。 (如果需要,首先将您的系统区域设置更改为英语区域)
Sys.setlocale("LC_ALL","English")
Time_Data_Strptime <- as.POSIXct(Time_Data[,1], format ="%a %b %d %H:%M:%S %z %Y")
然后像这样使用hist
:
hist(x=Time_Data_Strptime, breaks = "hours", freq = TRUE)
有关详情,请参阅??hist.POSIXt