[May-9] ask; data parser to df

	A	C	D	E	G	I	J
1	#input.csv	#I expect output.csv			#draft.R	#run draft.R
2	V1	V1	group	L;D	in1 = read.csv("input.csv")	V1	V2
3	LAYER: 34 ;	0;0	1	34;0	df2 <- in1	LAYER: 34 ;	1
4	DATATYPE: 0 ;	10;0	1	34;0	df2$V2 <- ifelse(	DATATYPE: 0 ;	2
5	0;0	10;0.9	1	34;0	grepl("LAYER",df2$V1),1,	0;0	0
6	10;0	0;0.9	1	34;0	ifelse(grepl("DATATYPE",df2$V1),2,0	10;0	0
7	10;0.9	0;0	1	34;0	)	10;0.9	0
8	0;0.9	0;9.1	2	34;0	)	0;0.9	0
9	0;0	10;9.1	2	34;0	df2 <- as.data.frame(df2)	0;0	0
10	LAYER: 34 ;	10;10	2	34;0	df2	LAYER: 34 ;	1
11	DATATYPE: 0 ;	0;10	2	34;0		DATATYPE: 0 ;	2
12	0;9.1	0;9.1	2	34;0		0;9.1	0
13	10;9.1	9.52;1.3	3	44;10		10;9.1	0
14	10;10	9.8;1.3	3	44;10		10;10	0
15	0;10	9.8;9.1	3	44;10		0;10	0
16	0;9.1	9.52;9.1	3	44;10		0;9.1	0
17	LAYER: 44 ;	9.52;1.3	3	44;10		LAYER: 44 ;	1
18	DATATYPE: 10 ;					DATATYPE: 10 ;	2
19	9.52;1.3					9.52;1.3	0
20	9.8;1.3					9.8;1.3	0
21	9.8;9.1					9.8;9.1	0
22	9.52;9.1					9.52;9.1	0
23	9.52;1.3					9.52;1.3	0
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100