R
!!!pivot_wider long形式のデータをwide形式に変換
{{outline}}
----
!変換元のlong形式のデータ
{{pre
head(sugi_iwa.dat2)

ID	cond	time	score
1	experiment	1	65	
2	experiment	1	75	
3	experiment	1	35	
4	experiment	1	70	
5	experiment	1	85	
6	experiment	1	55	
}}

!pivot_wider(names_from=整理する種類, values_from=数値)
{{pre
sugi_iwa.wide <- sugi_iwa.dat2 %>% 
  pivot_wider(names_from=c(cond, time),
              values_from=score)

head(sugi_iwa.wide)

ID	experiment_1	experiment_2	experiment_3	control_1	control_2	control_3

1	65	75	65	75	70	65
2	75	95	85	70	70	80
3	35	85	70	40	25	65
4	70	95	100	55	60	45
5	85	100	90	85	90	75
6	55	85	65	55	70	65

}}