r - 将计数转换为百分比-6ren

r - 将计数转换为百分比

转载作者：行者123 更新时间：2023-12-01 03:05:52

我正在尝试制作一个 ggplot，以显示报告在一天中特定时间发生的特定事件的人的百分比。有人认为我无法弄清楚如何将计数转换为百分比 - 比如说 70% 的人报告在凌晨 5 点进行 sleep 事件。所以，我想在 y 轴上有百分比。在我制作的情节下方

我的数据:

structure(list(time = c("04:00", "04:10", "04:20", "04:30", "04:40", 
"04:50", "05:00", "05:10", "05:20", "05:30", "05:40", "05:50", 
"06:00", "06:10", "06:20", "06:30", "06:40", "06:50", "07:00", 
"07:10", "07:20", "07:30", "07:40", "07:50", "08:00", "08:10", 
"08:20", "08:30", "08:40", "08:50", "09:00", "09:10", "09:20", 
"09:30", "09:40", "09:50", "10:00", "10:10", "10:20", "10:30", 
"10:40", "10:50", "11:00", "11:10", "11:20", "11:30", "11:40", 
"11:50", "12:00", "12:10", "12:20", "12:30", "12:40", "12:50", 
"13:00", "13:10", "13:20", "13:30", "13:40", "13:50", "14:00", 
"14:10", "14:20", "14:30", "14:40", "14:50", "15:00", "15:10", 
"15:20", "15:30", "15:40", "15:50", "16:00", "16:10", "16:20", 
"16:30", "16:40", "16:50", "17:00", "17:10", "17:20", "17:30", 
"17:40", "17:50", "18:00", "18:10", "18:20", "18:30", "18:40", 
"18:50", "19:00", "19:10", "19:20", "19:30", "19:40", "19:50", 
"20:00", "20:10", "20:20", "20:30", "20:40", "20:50", "21:00", 
"21:10", "21:20", "21:30", "21:40", "21:50", "22:00", "22:10", 
"22:20", "22:30", "22:40", "22:50", "23:00", "23:10", "23:20", 
"23:30", "23:40", "23:50", "00:00", "00:10", "00:20", "00:30", 
"00:40", "00:50", "01:00", "01:10", "01:20", "01:30", "01:40", 
"01:50", "02:00", "02:10", "02:20", "02:30", "02:40", "02:50", 
"03:00", "03:10", "03:20", "03:30", "03:40", "03:50", "04:00", 
"04:10", "04:20", "04:30", "04:40", "04:50", "05:00", "05:10", 
"05:20", "05:30", "05:40", "05:50", "06:00", "06:10", "06:20", 
"06:30", "06:40", "06:50", "07:00", "07:10", "07:20", "07:30", 
"07:40", "07:50", "08:00", "08:10", "08:20", "08:30", "08:40", 
"08:50", "09:00", "09:10", "09:20", "09:30", "09:40", "09:50", 
"10:00", "10:10", "10:20", "10:30", "10:40", "10:50", "11:00", 
"11:10", "11:20", "11:30", "11:40", "11:50", "12:00", "12:10", 
"12:20", "12:30", "12:40", "12:50", "13:00", "13:10", "13:20", 
"13:30", "13:40", "13:50", "14:00", "14:10", "14:20", "14:30", 
"14:40", "14:50", "15:00", "15:10", "15:20", "15:30", "15:40", 
"15:50", "16:00", "16:10", "16:20", "16:30", "16:40", "16:50", 
"17:00", "17:10", "17:20", "17:30", "17:40", "17:50", "18:00", 
"18:10", "18:20", "18:30", "18:40", "18:50", "19:00", "19:10", 
"19:20", "19:30", "19:40", "19:50", "20:00", "20:10", "20:20", 
"20:30", "20:40", "20:50", "21:00", "21:10", "21:20", "21:30", 
"21:40", "21:50", "22:00", "22:10", "22:20", "22:30", "22:40", 
"22:50", "23:00", "23:10", "23:20", "23:30", "23:40", "23:50", 
"00:00", "00:10", "00:20", "00:30", "00:40", "00:50", "01:00", 
"01:10", "01:20", "01:30", "01:40", "01:50", "02:00", "02:10", 
"02:20", "02:30", "02:40", "02:50", "03:00", "03:10", "03:20", 
"03:30", "03:40", "03:50", "04:00", "04:10", "04:20", "04:30", 
"04:40", "04:50", "05:00", "05:10", "05:20", "05:30", "05:40", 
"05:50", "06:00", "06:10", "06:20", "06:30", "06:40", "06:50", 
"07:00", "07:10", "07:20", "07:30", "07:40", "07:50", "08:00", 
"08:10", "08:20", "08:30", "08:40", "08:50", "09:00", "09:10", 
"09:20", "09:30", "09:40", "09:50", "10:00", "10:10", "10:20", 
"10:30", "10:40", "10:50", "11:00", "11:10", "11:20", "11:30", 
"11:40", "11:50", "12:00", "12:10", "12:20", "12:30", "12:40", 
"12:50", "13:00", "13:10", "13:20", "13:30", "13:40", "13:50", 
"14:00", "14:10", "14:20", "14:30", "14:40", "14:50", "15:00", 
"15:10", "15:20", "15:30", "15:40", "15:50", "16:00", "16:10", 
"16:20", "16:30", "16:40", "16:50", "17:00", "17:10", "17:20", 
"17:30", "17:40", "17:50", "18:00", "18:10", "18:20", "18:30", 
"18:40", "18:50", "19:00", "19:10", "19:20", "19:30", "19:40", 
"19:50", "20:00", "20:10", "20:20", "20:30", "20:40", "20:50", 
"21:00", "21:10", "21:20", "21:30", "21:40", "21:50", "22:00", 
"22:10", "22:20", "22:30", "22:40", "22:50", "23:00", "23:10", 
"23:20", "23:30", "23:40", "23:50", "00:00", "00:10", "00:20", 
"00:30", "00:40", "00:50", "01:00", "01:10", "01:20", "01:30", 
"01:40", "01:50", "02:00", "02:10", "02:20", "02:30", "02:40", 
"02:50", "03:00", "03:10", "03:20", "03:30", "03:40", "03:50", 
"04:00", "04:10", "04:20", "04:30", "04:40", "04:50", "05:00", 
"05:10", "05:20", "05:30", "05:40", "05:50", "06:00", "06:10", 
"06:20", "06:30", "06:40", "06:50", "07:00", "07:10", "07:20", 
"07:30", "07:40", "07:50", "08:00", "08:10", "08:20", "08:30", 
"08:40", "08:50", "09:00", "09:10", "09:20", "09:30", "09:40", 
"09:50", "10:00", "10:10", "10:20", "10:30", "10:40", "10:50", 
"11:00", "11:10", "11:20", "11:30", "11:40", "11:50", "12:00", 
"12:10", "12:20", "12:30", "12:40", "12:50", "13:00", "13:10", 
"13:20", "13:30", "13:40", "13:50", "14:00", "14:10", "14:20", 
"14:30", "14:40", "14:50", "15:00", "15:10", "15:20", "15:30", 
"15:40", "15:50", "16:00", "16:10", "16:20", "16:30", "16:40", 
"16:50", "17:00", "17:10", "17:20", "17:30", "17:40", "17:50", 
"18:00", "18:10", "18:20", "18:30", "18:40", "18:50", "19:00", 
"19:10", "19:20", "19:30", "19:40", "19:50", "20:00", "20:10", 
"20:20", "20:30", "20:40", "20:50", "21:00", "21:10", "21:20", 
"21:30", "21:40", "21:50", "22:00", "22:10", "22:20", "22:30", 
"22:40", "22:50", "23:00", "23:10", "23:20", "23:30", "23:40", 
"23:50", "00:00", "00:10", "00:20", "00:30", "00:40", "00:50", 
"01:00", "01:10", "01:20", "01:30", "01:40", "01:50", "02:00", 
"02:10", "02:20", "02:30", "02:40", "02:50", "03:00", "03:10", 
"03:20", "03:30", "03:40", "03:50", "04:00", "04:10", "04:20", 
"04:30", "04:40", "04:50", "05:00", "05:10", "05:20", "05:30", 
"05:40", "05:50", "06:00", "06:10", "06:20", "06:30", "06:40", 
"06:50", "07:00", "07:10", "07:20", "07:30", "07:40", "07:50", 
"08:00", "08:10", "08:20", "08:30", "08:40", "08:50", "09:00", 
"09:10", "09:20", "09:30", "09:40", "09:50", "10:00", "10:10", 
"10:20", "10:30", "10:40", "10:50", "11:00", "11:10", "11:20", 
"11:30", "11:40", "11:50", "12:00", "12:10", "12:20", "12:30", 
"12:40", "12:50", "13:00", "13:10", "13:20", "13:30", "13:40", 
"13:50", "14:00", "14:10", "14:20", "14:30", "14:40", "14:50", 
"15:00", "15:10", "15:20", "15:30", "15:40", "15:50", "16:00", 
"16:10", "16:20", "16:30", "16:40", "16:50", "17:00", "17:10", 
"17:20", "17:30", "17:40", "17:50", "18:00", "18:10", "18:20", 
"18:30", "18:40", "18:50", "19:00", "19:10", "19:20", "19:30", 
"19:40", "19:50", "20:00", "20:10", "20:20", "20:30", "20:40", 
"20:50", "21:00", "21:10", "21:20", "21:30", "21:40", "21:50", 
"22:00", "22:10", "22:20", "22:30", "22:40", "22:50", "23:00", 
"23:10", "23:20", "23:30", "23:40", "23:50", "00:00", "00:10", 
"00:20", "00:30", "00:40", "00:50", "01:00", "01:10", "01:20", 
"01:30", "01:40", "01:50", "02:00", "02:10", "02:20", "02:30", 
"02:40", "02:50", "03:00", "03:10", "03:20", "03:30", "03:40", 
"03:50", "04:00", "04:10", "04:20", "04:30", "04:40", "04:50", 
"05:00", "05:10", "05:20", "05:30", "05:40", "05:50", "06:00", 
"06:10", "06:20", "06:30", "06:40", "06:50", "07:00", "07:10", 
"07:20", "07:30", "07:40", "07:50", "08:00", "08:10", "08:20", 
"08:30", "08:40", "08:50", "09:00", "09:10", "09:20", "09:30", 
"09:40", "09:50", "10:00", "10:10", "10:20", "10:30", "10:40", 
"10:50", "11:00", "11:10", "11:20", "11:30", "11:40", "11:50", 
"12:00", "12:10", "12:20", "12:30", "12:40", "12:50", "13:00", 
"13:10", "13:20", "13:30", "13:40", "13:50", "14:00", "14:10", 
"14:20", "14:30", "14:40", "14:50", "15:00", "15:10", "15:20", 
"15:30", "15:40", "15:50", "16:00", "16:10", "16:20", "16:30", 
"16:40", "16:50", "17:00", "17:10", "17:20", "17:30", "17:40", 
"17:50", "18:00", "18:10", "18:20", "18:30", "18:40", "18:50", 
"19:00", "19:10", "19:20", "19:30", "19:40", "19:50", "20:00", 
"20:10", "20:20", "20:30", "20:40", "20:50", "21:00", "21:10", 
"21:20", "21:30", "21:40", "21:50", "22:00", "22:10", "22:20", 
"22:30", "22:40", "22:50", "23:00", "23:10", "23:20", "23:30", 
"23:40", "23:50", "00:00", "00:10", "00:20", "00:30", "00:40", 
"00:50", "01:00", "01:10", "01:20", "01:30", "01:40", "01:50", 
"02:00", "02:10", "02:20", "02:30", "02:40", "02:50", "03:00", 
"03:10", "03:20", "03:30", "03:40", "03:50", "04:00", "04:10", 
"04:20", "04:30", "04:40", "04:50", "05:00", "05:10", "05:20", 
"05:30", "05:40", "05:50", "06:00", "06:10", "06:20", "06:30", 
"06:40", "06:50", "07:00", "07:10", "07:20", "07:30", "07:40", 
"07:50", "08:00", "08:10", "08:20", "08:30", "08:40", "08:50", 
"09:00", "09:10", "09:20", "09:30", "09:40", "09:50", "10:00", 
"10:10", "10:20", "10:30", "10:40", "10:50", "11:00", "11:10", 
"11:20", "11:30", "11:40", "11:50", "12:00", "12:10", "12:20", 
"12:30", "12:40", "12:50", "13:00", "13:10", "13:20", "13:30", 
"13:40", "13:50", "14:00", "14:10", "14:20", "14:30", "14:40", 
"14:50", "15:00", "15:10", "15:20", "15:30", "15:40", "15:50", 
"16:00", "16:10", "16:20", "16:30", "16:40", "16:50", "17:00", 
"17:10", "17:20", "17:30", "17:40", "17:50", "18:00", "18:10", 
"18:20", "18:30", "18:40", "18:50", "19:00", "19:10", "19:20", 
"19:30", "19:40", "19:50", "20:00", "20:10", "20:20", "20:30", 
"20:40", "20:50", "21:00", "21:10", "21:20", "21:30", "21:40", 
"21:50", "22:00", "22:10", "22:20", "22:30", "22:40", "22:50", 
"23:00", "23:10", "23:20", "23:30", "23:40", "23:50", "00:00", 
"00:10", "00:20", "00:30", "00:40", "00:50", "01:00", "01:10", 
"01:20", "01:30", "01:40", "01:50", "02:00", "02:10", "02:20", 
"02:30"), variable = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 
4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 7L, 
7L), .Label = c("Personal care", "Sleep", "Eating", "Other personal care", 
"Employment", "Main job", "Second job", "Activites related to employment", 
"Study", "School or University", "Free time study", "House and family care", 
"Food management", "Household maintenance", "Making care for textiles", 
"Gardening and pet care", "Construction and repairs", "Shopping and services", 
"Household management", "Childcare of own household member", 
"Help to an adult household member", "Volunteer work and meeting", 
"Organisational work", "Informal help to others", "Participatory activties", 
"Social care", "Social life", "Entertainment and culture", "Resting", 
"Sport and outdoor activities", "Physical exercise", "Productive exercise", 
"Sportsrelated activities", "Hobbies, games and computing", "Arts and hobbies", 
"Computing", "PC Games", "Mass media", "Reading", "Tv and video", 
"Radio and music", "Travel and unspecified time use", "Travel by purpose", 
"Punctuating activity"), class = "factor"), value = c(0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 252, 252, 250, 246, 
246, 252, 242, 238, 236, 228, 228, 228, 218, 208, 200, 192, 186, 
178, 150, 144, 138, 126, 122, 108, 88, 76, 72, 68, 60, 54, 40, 
34, 30, 28, 28, 28, 14, 12, 10, 6, 6, 6, 4, 4, 4, 2, 2, 2, 2, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 2, 2, 2, 4, 6, 6, 6, 
10, 10, 6, 6, 8, 4, 4, 2, 4, 6, 4, 2, 0, 0, 0, 0, 0, 0, 0, 0, 
4, 4, 2, 2, 2, 2, 4, 2, 2, 2, 2, 4, 6, 4, 8, 12, 18, 20, 52, 
64, 76, 106, 116, 124, 142, 158, 166, 174, 180, 186, 196, 204, 
218, 222, 222, 220, 230, 232, 234, 234, 236, 238, 240, 240, 240, 
238, 240, 240, 244, 246, 248, 248, 250, 248, 0, 0, 0, 0, 3, 0, 
0, 6, 6, 15, 18, 9, 0, 0, 15, 6, 3, 6, 18, 21, 27, 36, 33, 30, 
18, 12, 18, 21, 27, 18, 24, 36, 27, 27, 18, 15, 27, 36, 24, 18, 
12, 15, 18, 18, 21, 18, 18, 12, 30, 39, 51, 42, 45, 45, 72, 78, 
69, 63, 66, 54, 36, 27, 36, 27, 27, 27, 12, 12, 12, 12, 21, 15, 
18, 21, 27, 24, 27, 24, 27, 24, 33, 39, 36, 36, 45, 54, 54, 60, 
54, 54, 42, 48, 51, 51, 45, 48, 45, 48, 54, 42, 42, 48, 45, 45, 
33, 39, 33, 36, 21, 18, 18, 18, 18, 12, 3, 3, 3, 3, 3, 3, 0, 
3, 0, 0, 0, 0, 0, 0, 0, 0, 3, 3, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 
0, 0, 4, 4, 4, 16, 8, 0, 20, 12, 8, 8, 8, 12, 24, 48, 40, 28, 
32, 36, 40, 44, 44, 52, 28, 28, 44, 40, 40, 32, 28, 36, 36, 36, 
48, 44, 48, 32, 36, 28, 28, 36, 32, 24, 12, 12, 16, 8, 12, 4, 
16, 12, 12, 16, 0, 12, 16, 12, 8, 4, 12, 8, 4, 12, 8, 12, 12, 
4, 8, 8, 4, 4, 4, 4, 4, 12, 16, 12, 12, 16, 16, 16, 20, 28, 24, 
20, 32, 28, 28, 16, 20, 24, 48, 28, 16, 12, 20, 20, 12, 12, 8, 
4, 12, 4, 40, 36, 32, 20, 32, 40, 44, 60, 60, 28, 20, 24, 60, 
60, 48, 32, 32, 24, 28, 28, 12, 12, 8, 8, 12, 8, 4, 8, 4, 0, 
0, 0, 0, 0, 0, 8, 0, 4, 0, 4, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 18, 
30, 30, 30, 36, 42, 42, 54, 54, 66, 66, 90, 102, 156, 168, 162, 
186, 204, 216, 234, 240, 246, 258, 258, 264, 264, 270, 270, 270, 
270, 270, 282, 276, 270, 258, 258, 252, 222, 222, 210, 210, 216, 
216, 198, 204, 216, 216, 210, 210, 252, 246, 240, 258, 258, 258, 
264, 270, 276, 264, 252, 258, 258, 258, 264, 264, 264, 258, 186, 
174, 168, 162, 144, 144, 120, 102, 108, 84, 78, 72, 48, 54, 48, 
54, 54, 60, 54, 54, 36, 36, 36, 42, 24, 24, 18, 12, 12, 6, 24, 
24, 24, 24, 30, 30, 30, 24, 24, 24, 24, 24, 24, 12, 12, 12, 12, 
12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 6, 6, 6, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 7, 7, 7, 7, 7, 7, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 
7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 7, 7, 7, 7, 7, 7, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)), row.names = c(NA, 1000L
), class = "data.frame")

我的代码:

melted_Activities<- melt(Activities)

plot<-ggplot(melted_Activities, aes(x = time,y = value,fill = variable)) + 
  geom_col(stats="bin")

plot + 
  labs(title = " Full-time workers who worked 1 to 4 days in a row during the week (N=128)", x="Time", y="Count", colour="Activties", fill="Activites")+
  theme(legend.position="right", axis.text.x = element_text(angle = 0, hjust = 0))+ 
  annotate("rect", fill = "black", alpha = 0.3, xmin = c(98), xmax = c(123), ymin = -Inf, ymax = Inf) + 
  scale_x_discrete(breaks = c( "04:00","05:00", "06:00", "07:00", "08:00", "09:00", "10:00", "11:00", "12:00","13:00", "14:00", "15:00", "16:00", "17:00", "18:00", "19:00", "20:00", "21:00","22:00", "23:00", "00:00", "01:00", "02:00", "03:00"), expand = c(0,0)) + 
  scale_y_continuous(expand = c(-0,0))

非常感谢

我想要的剧情

上图是使用以下代码生成的:

melted_Activities<-melt(Activities)
melted_Activities %>% 
group_by(time, variable) %>% 
summarise(value = sum(value)) %>% 
ungroup %>% mutate(value = 100 * value/sum(value)) %>% 
  ggplot(aes(time,value)) + 
  geom_col() +
labs(title = " Full-time workers who worked 1 to 4 days in a row during the week (N=128)", x="Time", y="Count", colour="Activties", fill="Activites")+theme(legend.position="right", axis.text.x = element_text(angle = 0, hjust = 0))+ annotate("rect", fill = "black", alpha = 0.3, xmin = c(98), xmax = c(123), ymin = -Inf, ymax = Inf) + scale_x_discrete(breaks = c( "04:00","05:00", "06:00", "07:00", "08:00", "09:00", "10:00", "11:00", "12:00","13:00", "14:00", "15:00", "16:00", "17:00", "18:00", "19:00", "20:00", "21:00","22:00", "23:00", "00:00", "01:00", "02:00", "03:00"), expand = c(0,0)) + scale_y_continuous(expand = c(-0,0))

最佳答案

看起来您想按时间将做不同事情的人 ( value ) 分成几组，然后将该组中的每个数字除以该组中的总人数。

d %>% group_by(time) %>% mutate(value = value/sum(value)) %>%
    ungroup() %>% mutate(time = lubridate::ymd_hm(paste0("2001-01-01", time))) %>%
    ggplot(aes(x = time, y = value, colour = variable)) +
    geom_line() +
    scale_x_datetime(breaks = scales::date_breaks("2 hours"), date_labels = "%H:%M")

关于r - 将计数转换为百分比，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/57795005/

文章推荐： Python:使用 NetworkX 和 mplleaflet 绘制图形

c++ - 将迭代器存储到字符串中(转换、转换、追加？)
我正在尝试将一个字符串逐个字符地复制到另一个字符串中。目的不是复制整个字符串，而是复制其中的一部分(我稍后会为此做一些条件......) 但我不知道如何使用迭代器。你能帮帮我吗？ std::stri
C++:转换/转换 void 指针到结构引用
我想将 void 指针转换为结构引用。结构的最小示例: #include "Interface.h" class Foo { public: Foo() : mAddress((uint
javascript - 为什么一个元素从窗口的左上角开始它的 css3 转换/转换？
这有点烦人:我有一个 div，它从窗口的左上角开始过渡，即使它位于文档的其他任何位置。我试过 usign -webkit-transform-origin 但没有成功，也许我用错了。有人可以帮助我吗？
html - 有什么方法可以检测 CSS3 转换/转换/动画的过程状态？
假设，如果将 CSS3 转换/转换/动画分配给 DOM 元素，我是否可以检测到该过程的状态？我想这样做的原因是因为我正在寻找类似过渡链的东西，例如，在前一个过渡之后运行一个过渡。最佳答案我在 h
CSS 转换/转换 - 谷歌浏览器中的 "shaky"图像
最近我遇到了“不稳定”屏幕，这很可能是由 CSS 转换引起的。事实上，它只发生在 Chrome 浏览器上(可能还有 Safari，因为一些人也报告了它)。知道如何让它看起来光滑吗？此外，您可能会注意
jquery - CSS3 转换(转换)在 Firefox 中不起作用，但在 Chrome 和 Safari 中起作用
我正在开发一个简单的 slider ，它使用 CSS 过渡来为幻灯片设置动画。我用一些基本样式和一些 javascript 创建了一支笔 here .注意:由于 Codepen 使用 Prefixfr
Linq 转换
我正在使用以下代码返回 IList: public IList FindCodesByCountry(string country) { var query =
转换、计算的RESTful设计
如何设计像这样的操作: 计算转化翻译例如:从“EUR”转换为“CNY”金额“100”。这是 /convert?from=EUR&to=CNY&amount=100 RESTful 吗？最佳答
Jquery 转换
我使用 jquery 组合了一个图像滚动器，如下所示 function rotateImages(whichHolder, start) { var images = $('#' +which
CSS 转换
如何使用 CSS (-moz-transform) 更改一个如下所示的 div: 最佳答案你可以看看Mozilla Developer Center .甚至还有例子。但是，在我看来，您的具体示例不
CSS 转换
我需要帮助我正在尝试在选中和未选中的汉堡菜单上实现动画。我能够为菜单设置动画，但我不知道如何在转换为 0 时为左菜单动画设置动画 &__menu { transform: translateX(
swift :转换
我正在为字典格式之间的转换而苦苦挣扎:我正在尝试将下面的项目数组转换为下面的结果数组。本质上是通过在项目第一个元素中查找重复项，然后仅在第一个参数不同时才将文件添加到结果集中。 var items:[
具有相同布局的不同类型之间的C++转换
如果我有两个定义相同的结构，那么在它们之间进行转换的最佳方式是什么？ struct A { int i; float f; }; struct B { int i; float f; }; void
Javascript 转换
我编写了一个 javascript 代码，可以将视口(viewport)从一个链接滑动到另一个链接。基本上一切正常，你怎么能在那里看到http://jsfiddle.net/DruwJ/8/ 我现在的
meteorjs 图像上传/转换
我需要将文件上传到 meteor ，对其进行一些图像处理(必要时进行图像转换，从图像生成缩略图)，然后将其存储在外部图像存储服务器(s3)中。这应该尽可能快。您对 nodejs 图像处理库有什么建议
KDB+，转换，左操作数
刚开始接触KDB+，有一些问题很难从Q for Mortals中得到。说，这里 http://code.kx.com/wiki/JB:QforMortals2/casting_and_enumera
JSF float 转换
我在这里的一个项目中使用 JSF 1.2 和 IceFaces 1.8。我有一个页面，它基本上是一大堆浮点数字段的大编辑网格。这是通过 inputText 实现的页面上的字段指向具有原始值的值对象
SceneKit 转换 ScnMatrix4
ScnMatrix4 是一个 4x4 矩阵。我的问题是什么矩阵行对应于位置(ScnVector3)，旋转(ScnVector4)，比例(ScnVector3)。第 4 行是空的吗？编辑: 我玩弄了
Scala map 转换
恐怕我是 Scala 新手: 我正在尝试根据一些简单的逻辑将 Map 转换为新 Map: val postVals = Map("test" -> "testing1", "test2" -> "te
基于配置文件的 XSLT 转换
输入: This is sample 1 This is sample 2 输出: ~COLOR~[Green]This is sample 1~COLOR~[Red]This is sam

行者123

个人简介

我是一名优秀的程序员,十分优秀！

作者热门文章

滴滴打车优惠券免费领取

全站热门文章

首页

博学

6Ren·AI

商城

r - 将计数转换为百分比