質問編集履歴
3
変換後のdataframeのイメージ
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -23,6 +23,17 @@
|
|
|
23
23
|
9999 4980 180 ・・・ NA
|
|
24
24
|
```
|
|
25
25
|
|
|
26
|
+
変換後のdataframeのイメージ
|
|
27
|
+
```
|
|
28
|
+
ID 商品購入_1 商品購入_2 ・・・ 商品購入_50
|
|
29
|
+
0001 1 0 1
|
|
30
|
+
0002 1 1 1
|
|
31
|
+
0003 0 1 1
|
|
32
|
+
・
|
|
33
|
+
・
|
|
34
|
+
・
|
|
35
|
+
9999 1 1 ・・・ 0
|
|
36
|
+
```
|
|
26
37
|
|
|
27
38
|
一つの列に対してなら、
|
|
28
39
|
```{r}
|
2
DataFrameのイメージ
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -11,7 +11,19 @@
|
|
|
11
11
|
商品購入_1 : numeric型 #1~5000の値をとる
|
|
12
12
|
```
|
|
13
13
|
|
|
14
|
+
dataframeのイメージ
|
|
15
|
+
```
|
|
16
|
+
ID 商品購入_1 商品購入_2 ・・・ 商品購入_50
|
|
17
|
+
0001 2380 NA 2400
|
|
18
|
+
0002 1280 1980 980
|
|
19
|
+
0003 NA 2600 2480
|
|
20
|
+
・
|
|
21
|
+
・
|
|
22
|
+
・
|
|
23
|
+
9999 4980 180 ・・・ NA
|
|
24
|
+
```
|
|
14
25
|
|
|
26
|
+
|
|
15
27
|
一つの列に対してなら、
|
|
16
28
|
```{r}
|
|
17
29
|
df %>%
|
1
内容修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -30,7 +30,10 @@
|
|
|
30
30
|
商品購入_50 = if_else(is.na(商品購入_50),0,1)
|
|
31
31
|
)
|
|
32
32
|
```
|
|
33
|
+
とする以外の解決策がわからず、
|
|
34
|
+
mutate_at(vars(matches("商品購入")),funs(・・・))
|
|
35
|
+
みたいな感じでかけるといいなと思ったのだが、funsの中身をどうすればよいかわからず、
|
|
33
|
-
|
|
36
|
+
調べても解決策がわからなかった。
|
|
34
37
|
|
|
35
38
|
|
|
36
39
|
### 補足情報
|