Кондиционирование по двум переменным в решетке - PullRequest
0 голосов
/ 23 апреля 2020

Это фрейм данных, с которым я работаю:

datal2<- structure(list(id = structure(c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 
3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L), .Label = c("49180", "75725", 
"88743", "172231"), class = "factor"), group = structure(c(1L, 
1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 1L, 1L, 1L, 1L), .Label = c("Control", 
"Intervention"), class = "factor"), time = c(1L, 2L, 3L, 4L, 
1L, 2L, 3L, 4L, 1L, 2L, 3L, 4L, 1L, 2L, 3L, 4L), v6 = c(0.2, 
0.27, NA, NA, 0.36, 0.4, 0.35, 0.36, 0.44, 0.57, 0.65, 0.59, 
0.67, 0.86, 0.86, 0.78)), reshapeLong = list(varying = structure(list(
v6 = c("v6_Ing", "v6_Alt", "v6_M1", "v6_M3")), v.names = "v6", times = 1:4), 
v.names = "v6", idvar = "id", timevar = "time"), row.names = c("49180.1", 
"49180.2", "49180.3", "49180.4", "75725.1", "75725.2", "75725.3", 
"75725.4", "88743.1", "88743.2", "88743.3", "88743.4", "172231.1", 
"172231.2", "172231.3", "172231.4"), class = "data.frame")

Я хочу упорядочить лиц (id) по группе, к которой они принадлежат.

Когда я пишу:

library(lattice)
print(xyplot(v6 ~ time |id+group, groups=group, datal2, aspect = "xy",
         type = c("g", "p", "r"),as.table=TRUE,auto.key=TRUE,
         xlab = "Measurement times",
         ylab = "Gait speed",
         scales = list(cex = 1,
                       x = list(tick.number = 4))))

Я получил по одному ряду графиков рассеяния для каждой группы, но в каждом ряду есть пустые ячейки для лиц, которые не относятся к этой группе. Я хотел бы избавиться от этих пустых ячеек.

Спасибо за ваше время и внимание.

R версия 3.5.2 (2018-12-20) Платформа: x86_64-w64-mingw32 / x64 (64-разрядная версия) Работает с: Windows> = 8 x64 (сборка 9200) подключенных базовых пакетов: [1] stats graphics grDevices использует наборы методов базы данных
другие подключенные пакеты: [1] lattice_0.20-38 загружается через пространство имен (и не присоединяется): [1] compiler_3.5.2 tools_3.5.2 grid_3.5.2

...