我正在尝试根据这些绘图示例绘制3d表面图
当我在数据集上尝试这些示例时
test_plotly = structure(list(Age = c(82L, 82L, 83L, 83L, 83L, 81L,
81L,
81L, 79L, 80L, 82L, 78L, 78L, 79L, 78L, 80L, 79L, 77L, 77L, 77L,
77L, 78L, 76L, 77L, 77L, 78L, 77L, 76L, 83L, 79L, 76L, 84L, 75L,
75L, 77L, 74L, 74L, 75L, 74L, 74L, 73L, 73L, 74L, 81L, 84L, 73L,
72L, 73L, 71L, 71L, 73L, 72L, 79L, 72L, 71L, 76L, 72L, 75L, 73L,
71L, 70L, 79L, 69L, 70L, 70L, 70L, 77L, 69L, 69L, 68L, 69L, 73L, …我有三个日期列,如下所示
Id Date1 Date2 Date3
12 2005-12-22 NA NA
11 2009-10-11 NA NA
29 NA 2005-04-11 NA
45 NA NA 2008-11-06
39 NA NA 2006-01-02
44 NA 2005-04-16 NA
我试图将三个Date列折叠到一个Date列中,如果Date1列中有Date值,则创建索引变量1;如果Date2列中有Date,则创建2;如果Date3列中有Date,则创建3
Id Date Index
12 2005-12-22 1
11 2009-10-11 1
29 2005-04-11 2
45 2008-11-06 3
39 2006-01-02 3
44 2005-04-16 2
我可以使用一个巨大的ifelse语句来做到这一点我想知道是否有人知道这样做的有效方法？