t;- mydata2$Time[mydata2$GlucoseHistory > 9];#获取4号符合条件的时间。
> time3 <- mydata3$Time[mydata3$GlucoseHistory > 9];#获取5号符合条件的时间。
> time1;
[1] 7:05 7:20 7:10 7:38 7:25 7:47 7:41 7:56 8:19 8:11 8:26 8:47 8:41 9:00 9:07 8:56 10:11
[18] 10:21 10:25 10:12 10:32 10:36 10:38 10:27 10:42 10:57 11:26 11:12 11:31 11:27 11:45 11:43 11:58 12:10
[35] 11:57 12:19 12:24 12:12 12:37 12:29 12:44 12:59 13:14 13:29 13:55 13:43 13:58 14:13 14:29 14:29 14:44
[52] 15:02 15:00 15:15 15:30 15:45 16:06 16:00 16:15 16:43 16:30 16:45 17:04 17:00 17:23 17:28 17:28 17:15
[69] 17:30 17:56 17:45 18:00
1389 Levels: 0:00 0:01 0:03 0:04 0:05 0:06 0:07 0:08 0:09 0:10 0:11 0:12 0:13 0:15 0:16 0:17 0:19 ... 9:59
> time2;
[1] 4:35 4:50 5:05 5:31 5:21 5:36 5:51 6:06 6:28 6:21 6:36 6:51 7:06 7:28 7:22 7:37 7:52
[18] 8:07 8:34 8:21 8:47 8:37 8:52 9:08 9:07 9:24 9:22 9:41 9:37 9:58 9:52 10:11 12:00 11:53
[35] 12:17 12:09 12:30 12:23 12:44 12:40 12:55 13:10 13:25 13:40 13:55 14:10 14:25 14:40 14:55 15:22 15:11
[52] 15:26 15:41 15:56 16:11 16:26 16:44 16:40 17:05 16:55 17:10 17:28 17:28 17:26 17:45 17:41 17:59 17:55
[69] 18:14 18:11 18:34 18:26 18:41 19:02 18:57 19:12 19:27 19:42 19:57 20:12 20:27 20:42 20:57 21:12 21:13
[86] 21:35 21:28 21:50 21:43 21:58 22:13 22:35 22:29 22:44 22:59 23:14 23:29 23:44
1389 Levels: 0:00 0:01 0:03 0:04 0:05 0:06 0:07 0:08 0:09 0:10 0:11 0:12 0:13 0:15 0:16 0:17 0:19 ... 9:59
> time3;
[1] 0:03 6:16 6:31 6:46 7:13 7:01 7:16 7:31 7:32 7:52 7:47 8:16 8:02 8:17 8:41 8:32 8:47
[18] 9:02 9:03 13:19 13:40 13:35 13:50 14:05 14:20 14:35 15:04 14:50 15:05 15:20 15:21 15:36 15:51 16:19
[35] 16:06 16:21 16:42 16:36 16:56 16:51 17:06 17:26 17:26 17:22 17:50 17:37 17:52 18:10 18:14 18:19 18:07
[52] 18:22 19:53 20:00 20:06 19:52 20:14 20:07 20:32 20:22 20:43 20:38 20:58 20:53 21:08 21:31 21:23 21:48
[69] 21:38 21:53 22:08 22:24 22:27 22:42
1389
结论:
1、总的血糖日平均值:9.791199、6/2血糖平均值:10.90101、6/3血糖平均值:7.88(其余天略)。
2、选取的6/3、6/4、6/5三日,血糖均超过9的时间段是7:00——9:00和13:00——18:00。