我有以下数据框
dd <- data.frame(
date = c("2018-03-04", "2018-03-05", "2018-03-06", "2018-03-07", "2018-03-09",
"2018-03-11", "2018-03-15", "2018-03-16", "2018-03-17"),
day_after_rainfall = c(1,2,3,4,1,1,1,2,3)
)
我想基于day_after_rainfall
为每一行分配ID,如果连续下雨几天,那么这些天将被分配相同的ID。
理想的结果是
date day_after_rainfall .id
1: 2018-03-04 1 1
2: 2018-03-05 2 1
3: 2018-03-06 3 1
4: 2018-03-07 4 1
5: 2018-03-09 1 2
6: 2018-03-11 1 3
7: 2018-03-15 1 4
8: 2018-03-16 2 4
9: 2018-03-17 3 4
我使用了以下代码
library(splitstackshape)
dd <- getanID(dd, id.vars = "day_after_rainfall")
我明白了
date day_after_rainfall .id
1: 2018-03-04 1 1
2: 2018-03-05 2 1
3: 2018-03-06 3 1
4: 2018-03-07 4 1
5: 2018-03-09 1 2
6: 2018-03-11 1 3
7: 2018-03-15 1 4
8: 2018-03-16 2 2
9: 2018-03-17 3 2
最后两行没有获得正确的ID。为什么以及如何解决此问题?
答案 0 :(得分:3)
您可以使用System.err: com.tns.NativeScriptException:
System.err: Calling js method onClick failed
System.err:
System.err: Error: java.lang.IllegalArgumentException: No such service ComponentInfo{org.nativescript.ITPalert/org.nativescipt.ITPalert.TestJobService}
System.err: android.os.Parcel.readException(Parcel.java:1963)
System.err: android.os.Parcel.readException(Parcel.java:1905)
System.err: android.app.job.IJobScheduler$Stub$Proxy.schedule(IJobScheduler.java:180)
System.err: android.app.JobSchedulerImpl.schedule(JobSchedulerImpl.java:44)
System.err: com.tns.Runtime.callJSMethodNative(Native Method)
System.err: com.tns.Runtime.dispatchCallJSMethodNative(Runtime.java:1203)
System.err: com.tns.Runtime.callJSMethodImpl(Runtime.java:1083)
System.err: com.tns.Runtime.callJSMethod(Runtime.java:1070)
System.err: com.tns.Runtime.callJSMethod(Runtime.java:1050)
System.err: com.tns.Runtime.callJSMethod(Runtime.java:1042)
System.err: com.tns.gen.java.lang.Object_vendor_30697_26_ClickListenerImpl.onClick(Object_vendor_30697_26_ClickListenerImpl.java:17)
System.err: android.view.View.performClick(View.java:6896)
函数:
cumsum