[R] How compare pre-treatment vs. post-treatment assessments

[Landini Massimiliano]

Please consider 

Trt_No	Plot	Sub	metpru_0dat	metpru_2dat	metpru_7dat
metpru_14dat
1	1	1	9	14	12	5
1	1	2	6	7	6	5
1	1	3	6	15	13	5
1	1	4	10	10	9	10
1	1	5	7	7	8	14
1	1	6	9	10	12	11
1	1	7	6	5	8	9
1	1	8	15	9	13	15
1	1	9	15	7	15	6
1	1	10	14	11	15	7
2	2	1	13	7	9	9
2	2	2	13	8	14	13
2	2	3	15	8	11	7
2	2	4	8	13	11	12
2	2	5	12	10	5	14
2	2	6	8	5	11	7
2	2	7	7	6	5	14
2	2	8	12	14	10	11
2	2	9	5	7	9	6
2	2	10	7	15	14	9
3	3	1	4	14	14	5
3	3	2	4	11	9	12
3	3	3	10	8	9	8
3	3	4	6	12	15	13
3	3	5	9	5	10	11
3	3	6	10	8	9	14
3	3	7	4	14	15	11
3	3	8	11	10	8	15
3	3	9	15	12	9	12
3	3	10	14	12	9	7
4	4	1	11	13	15	8
4	4	2	12	14	5	10
4	4	3	15	14	11	14
4	4	4	12	14	8	10
4	4	5	10	7	5	10
4	4	6	7	12	13	7
4	4	7	12	14	9	11
4	4	8	5	9	15	5
4	4	9	12	13	6	5
4	4	10	9	5	10	6
5	5	1	12	2	2	5
5	5	2	14	11	5	5
5	5	3	14	3	1	3
5	5	4	9	5	5	6
5	5	5	14	3	6	5
5	5	6	7	7	7	6
5	5	7	6	10	6	1
5	5	8	4	7	10	11
5	5	9	8	7	2	1
5	5	10	7	4	8	3
3	6	1	11	11	5	14
3	6	2	5	11	12	13
3	6	3	9	8	15	10
3	6	4	15	14	14	13
3	6	5	14	8	12	14
3	6	6	7	6	7	10
3	6	7	13	8	11	14
3	6	8	5	13	14	5
3	6	9	14	11	5	6
3	6	10	7	10	14	11
2	7	1	11	9	12	6
2	7	2	8	9	9	15
2	7	3	7	11	13	5
2	7	4	4	7	7	10
2	7	5	4	15	14	5
2	7	6	10	5	5	9
2	7	7	7	9	7	6
2	7	8	13	13	12	10
2	7	9	9	11	6	7
2	7	10	8	9	9	7
5	8	1	11	6	9	10
5	8	2	10	8	4	11
5	8	3	6	2	11	8
5	8	4	12	6	8	4
5	8	5	9	11	7	10
5	8	6	7	3	3	9
5	8	7	11	10	8	5
5	8	8	14	6	5	2
5	8	9	13	1	1	2
5	8	10	4	7	5	1
1	9	1	13	15	10	8
1	9	2	13	6	11	8
1	9	3	11	6	6	6
1	9	4	6	10	12	12
1	9	5	5	12	9	10
1	9	6	4	7	14	5
1	9	7	13	15	5	9
1	9	8	10	14	5	8
1	9	9	4	12	9	12
1	9	10	4	12	12	14
4	10	1	9	13	7	13
4	10	2	14	11	12	7
4	10	3	9	9	6	14
4	10	4	11	7	10	5
4	10	5	5	7	6	11
4	10	6	8	8	15	6
4	10	7	15	11	13	5
4	10	8	13	7	7	11
4	10	9	15	7	12	14
4	10	10	7	7	11	13
5	11	1	12	3	5	8
5	11	2	14	4	5	1
5	11	3	5	4	5	8
5	11	4	9	10	8	3
5	11	5	6	11	3	1
5	11	6	9	3	11	10
5	11	7	10	9	1	6
5	11	8	12	10	2	11
5	11	9	9	1	7	7
5	11	10	7	2	6	5
3	12	1	5	8	7	6
3	12	2	4	15	7	14
3	12	3	13	15	11	14
3	12	4	8	15	15	5
3	12	5	6	12	9	14
3	12	6	15	8	10	9
3	12	7	7	12	10	8
3	12	8	8	13	10	15
3	12	9	6	7	6	10
3	12	10	11	5	14	7
4	13	1	12	15	15	7
4	13	2	13	7	13	11
4	13	3	4	12	8	13
4	13	4	9	11	15	6
4	13	5	8	10	7	10
4	13	6	10	9	14	12
4	13	7	9	12	13	13
4	13	8	4	13	11	8
4	13	9	7	10	8	10
4	13	10	4	9	5	11
1	14	1	4	15	11	5
1	14	2	11	12	14	9
1	14	3	10	7	14	12
1	14	4	7	7	13	7
1	14	5	5	6	8	11
1	14	6	13	9	8	5
1	14	7	7	7	12	13
1	14	8	10	15	15	11
1	14	9	8	5	7	5
1	14	10	12	13	7	12
2	15	1	5	8	10	14
2	15	2	10	15	12	7
2	15	3	13	9	10	8
2	15	4	12	15	15	14
2	15	5	12	7	15	7
2	15	6	7	12	14	12
2	15	7	9	10	10	11
2	15	8	9	15	10	10
2	15	9	8	9	5	7
2	15	10	4	12	6	15
4	16	1	15	9	6	8
4	16	2	6	7	5	12
4	16	3	5	8	14	8
4	16	4	13	14	10	9
4	16	5	14	6	10	15
4	16	6	7	10	13	7
4	16	7	12	14	9	8
4	16	8	4	10	13	10
4	16	9	9	11	12	8
4	16	10	8	15	7	7
3	17	1	7	13	14	7
3	17	2	5	7	12	8
3	17	3	12	11	13	6
3	17	4	15	10	10	13
3	17	5	14	6	9	8
3	17	6	12	12	9	7
3	17	7	14	10	10	5
3	17	8	6	14	12	11
3	17	9	9	15	5	10
3	17	10	12	7	10	10
1	18	1	6	6	12	5
1	18	2	6	14	6	5
1	18	3	4	5	8	8
1	18	4	9	9	8	15
1	18	5	6	11	14	15
1	18	6	6	13	5	7
1	18	7	5	12	6	15
1	18	8	11	13	5	12
1	18	9	13	6	5	9
1	18	10	6	8	8	12
2	19	1	14	5	5	13
2	19	2	8	14	14	14
2	19	3	13	14	7	10
2	19	4	6	5	15	13
2	19	5	7	5	7	14
2	19	6	6	12	14	8
2	19	7	6	7	7	12
2	19	8	11	8	14	9
2	19	9	10	5	7	10
2	19	10	4	8	13	7
5	20	1	6	6	4	1
5	20	2	5	6	11	10
5	20	3	5	10	4	11
5	20	4	8	10	4	3
5	20	5	8	3	11	9
5	20	6	7	4	2	10
5	20	7	8	10	1	3
5	20	8	10	4	5	6
5	20	9	12	3	8	5
5	20	10	11	5	9	7


These are count of metcalfa colony at 0 DaysAfterTreatment (=> before trt), 2,
7 and 14 DAT (=>three column of data after treatment)

First column  contain  the number of the treatment
1=>check
2=>experimental insecticide @low rate
3=>experimental insecticide @normal rate
4=>experimental insecticide @double rate
5=> Standard insecticide

Second column contain progressive number of plot (randomized treatment)
Third column contain progressive number of each sub sample.
So
how can I perform pre-post control following Henderson-Tilton formula that is

(1-(insect_in_control_before_trt * insect_in_treatment_after_trt) /
((insect_in_control_after_trt * insect_in_treatment_before_trt))*100

so can anybody suggest me how can I sum every sub sample by each plot(20 data
per column) and perform H-T formula?

or ABBOT

100*(1-(insect_in_treatment_after_trt / insect in control after trt)


tnx in advance

-------------------------------------------------------------------------------------------------------------------------
Landini Dr. Massimiliano
Tel. mob. (+39) 347 140 11 94
Tel./Fax. (+39) 051 762 196
e-mail: numero (dot) primo (at) tele2 (dot) it
-------------------------------------------------------------------------------------------------------------------------
Regola del righello: La linea retta non esiste.