j'ai fait une analyse ANOVA à 2 facteurs et un test de Tukey.
Les comparaisons sont très nombreuses mais seulement certaines m'intéressent particulièrement.
J'ai donc réduit le fichier où sont listés tous les résultats et maintenant je souhaiterais refaire un graphique du type plot(TukeyHSD(z)) que j'ai utilisé sur toutes les datas.
Mais je ne sais pas comment écrire la ligne de code ... Les colonnes d'intérêt sont lwr et upr
Je vous remercie des pistes ou solutions que vous pourrez me donner.
Patricia
Mon dataframe avec les valeurs est celui-ci :
Code : Tout sélectionner
TheResults <- structure(list(X = c("DMSO 0.25 %:0' EGF-Bafilomycin 80 nM:0' EGF",
"Bafilomycin 80 nM:15' EGF-Bafilomycin 80 nM:0' EGF", "DMSO 0.25 %:0' EGF-Curcumin 10 µM:0' EGF",
"Curcumin 10 µM:15' EGF-Curcumin 10 µM:0' EGF", "Dynasore 80 µM:0' EGF-DMSO 0.25 %:0' EGF",
"Gefitinib 10 µM:0' EGF-DMSO 0.25 %:0' EGF", "Molecule 2 25 µM:0' EGF-DMSO 0.25 %:0' EGF",
"Molecule 3 25 µM:0' EGF-DMSO 0.25 %:0' EGF", "Tyrphostin 10 µM:0' EGF-DMSO 0.25 %:0' EGF",
"DMSO 0.25 %:15' EGF-DMSO 0.25 %:0' EGF", "Dynasore 80 µM:15' EGF-Dynasore 80 µM:0' EGF",
"Gefitinib 10 µM:15' EGF-Gefitinib 10 µM:0' EGF", "Molecule 2 25 µM:15' EGF-Molecule 2 25 µM:0' EGF",
"Molecule 3 25 µM:15' EGF-Molecule 3 25 µM:0' EGF", "Tyrphostin 10 µM:15' EGF-Tyrphostin 10 µM:0' EGF",
"DMSO 0.25 %:15' EGF-Bafilomycin 80 nM:15' EGF", "Bafilomycin 80 nM:30' EGF-Bafilomycin 80 nM:15' EGF",
"DMSO 0.25 %:15' EGF-Curcumin 10 µM:15' EGF", "Curcumin 10 µM:30' EGF-Curcumin 10 µM:15' EGF",
"Dynasore 80 µM:15' EGF-DMSO 0.25 %:15' EGF", "Gefitinib 10 µM:15' EGF-DMSO 0.25 %:15' EGF",
"Molecule 2 25 µM:15' EGF-DMSO 0.25 %:15' EGF", "Molecule 3 25 µM:15' EGF-DMSO 0.25 %:15' EGF",
"Tyrphostin 10 µM:15' EGF-DMSO 0.25 %:15' EGF", "DMSO 0.25 %:30' EGF-DMSO 0.25 %:15' EGF",
"Dynasore 80 µM:30' EGF-Dynasore 80 µM:15' EGF", "Gefitinib 10 µM:30' EGF-Gefitinib 10 µM:15' EGF",
"Molecule 2 25 µM:30' EGF-Molecule 2 25 µM:15' EGF", "Molecule 3 25 µM:30' EGF-Molecule 3 25 µM:15' EGF",
"Tyrphostin 10 µM:30' EGF-Tyrphostin 10 µM:15' EGF", "DMSO 0.25 %:30' EGF-Bafilomycin 80 nM:30' EGF",
"Bafilomycin 80 nM:60' EGF-Bafilomycin 80 nM:30' EGF", "DMSO 0.25 %:30' EGF-Curcumin 10 µM:30' EGF",
"Curcumin 10 µM:60' EGF-Curcumin 10 µM:30' EGF", "Dynasore 80 µM:30' EGF-DMSO 0.25 %:30' EGF",
"Gefitinib 10 µM:30' EGF-DMSO 0.25 %:30' EGF", "Molecule 2 25 µM:30' EGF-DMSO 0.25 %:30' EGF",
"Molecule 3 25 µM:30' EGF-DMSO 0.25 %:30' EGF", "Tyrphostin 10 µM:30' EGF-DMSO 0.25 %:30' EGF",
"DMSO 0.25 %:60' EGF-DMSO 0.25 %:30' EGF", "Dynasore 80 µM:60' EGF-Dynasore 80 µM:30' EGF",
"Gefitinib 10 µM:60' EGF-Gefitinib 10 µM:30' EGF", "Molecule 2 25 µM:60' EGF-Molecule 2 25 µM:30' EGF",
"Molecule 3 25 µM:60' EGF-Molecule 3 25 µM:30' EGF", "Tyrphostin 10 µM:60' EGF-Tyrphostin 10 µM:30' EGF",
"DMSO 0.25 %:60' EGF-Bafilomycin 80 nM:60' EGF", "DMSO 0.25 %:60' EGF-Curcumin 10 µM:60' EGF",
"Dynasore 80 µM:60' EGF-DMSO 0.25 %:60' EGF", "Gefitinib 10 µM:60' EGF-DMSO 0.25 %:60' EGF",
"Molecule 2 25 µM:60' EGF-DMSO 0.25 %:60' EGF", "Molecule 3 25 µM:60' EGF-DMSO 0.25 %:60' EGF",
"Tyrphostin 10 µM:60' EGF-DMSO 0.25 %:60' EGF", "Bafilomycin 80 nM:30' EGF-Bafilomycin 80 nM:0' EGF",
"Bafilomycin 80 nM:60' EGF-Bafilomycin 80 nM:0' EGF", "Curcumin 10 µM:30' EGF-Curcumin 10 µM:0' EGF",
"Curcumin 10 µM:60' EGF-Curcumin 10 µM:0' EGF", "DMSO 0.25 %:30' EGF-DMSO 0.25 %:0' EGF",
"DMSO 0.25 %:60' EGF-DMSO 0.25 %:0' EGF", "Dynasore 80 µM:30' EGF-Dynasore 80 µM:0' EGF",
"Dynasore 80 µM:60' EGF-Dynasore 80 µM:0' EGF", "Gefitinib 10 µM:30' EGF-Gefitinib 10 µM:0' EGF",
"Gefitinib 10 µM:60' EGF-Gefitinib 10 µM:0' EGF", "Molecule 2 25 µM:30' EGF-Molecule 2 25 µM:0' EGF",
"Molecule 2 25 µM:60' EGF-Molecule 2 25 µM:0' EGF", "Molecule 3 25 µM:30' EGF-Molecule 3 25 µM:0' EGF",
"Molecule 3 25 µM:60' EGF-Molecule 3 25 µM:0' EGF", "Tyrphostin 10 µM:30' EGF-Tyrphostin 10 µM:0' EGF",
"Tyrphostin 10 µM:60' EGF-Tyrphostin 10 µM:0' EGF", "Bafilomycin 80 nM:60' EGF-Bafilomycin 80 nM:15' EGF",
"Curcumin 10 µM:60' EGF-Curcumin 10 µM:15' EGF", "DMSO 0.25 %:60' EGF-DMSO 0.25 %:15' EGF",
"Dynasore 80 µM:60' EGF-Dynasore 80 µM:15' EGF", "Gefitinib 10 µM:60' EGF-Gefitinib 10 µM:15' EGF",
"Molecule 2 25 µM:60' EGF-Molecule 2 25 µM:15' EGF", "Molecule 3 25 µM:60' EGF-Molecule 3 25 µM:15' EGF",
"Tyrphostin 10 µM:60' EGF-Tyrphostin 10 µM:15' EGF"), diff = c(0.074347796,
32.26196673, -0.32606475, 40.55679549, -0.483840113, -0.119465363,
-0.723462905, 0.259704315, -0.850384466, 50.60472596, 57.65152062,
0.11373189, 60.72198101, 32.57366947, 0.391602708, 18.41710703,
17.05211027, 9.721865716, 12.62857316, 6.562954545, -50.61045943,
9.393792141, -17.77135218, -51.06350772, 9.644970284, 12.67474806,
1.450627635, 8.721662404, 27.4670685, 1.842942847, 11.00996704,
25.87195252, 6.738262838, 0.27130972, 9.592732324, -58.80480208,
8.470484262, 0.050746042, -58.86553516, -12.85478413, -10.60286753,
2.808663454, -17.30296703, -15.79219726, 0.381985804, -27.7167696,
-6.38783101, 11.84464892, -43.1413545, 4.022301357, -2.886667094,
-45.62876522, 49.314077, 75.18602951, 53.18536866, 53.45667838,
60.24969624, 47.39491212, 70.32626868, 59.72340115, 1.564359525,
4.373022979, 69.44364341, 52.14067638, 60.04073797, 44.24854071,
2.234545554, 2.616531358, 42.92406279, 12.89988288, -3.209813844,
2.071880531, 4.259291089, -8.581304629, 11.67487124, 2.224928651
), lwr = c(-5.092140779, 26.65393293, -5.293443048, 35.32458797,
-5.771404533, -5.143737207, -5.925648056, -5.241700463, -6.014386155,
45.17490361, 51.90844652, -5.153260127, 55.02081006, 26.45262682,
-5.146297766, 12.56557649, 11.13755166, 4.048760813, 6.92530654,
0.688643232, -56.2656224, 3.484173658, -23.82814005, -56.85007829,
3.819287931, 6.611916017, -4.159555034, 1.329627424, 19.84429287,
-3.733020403, 5.120979972, 19.98296544, 0.8832047, -5.2700091,
3.577005112, -64.58683082, 1.145379115, -7.389724632, -64.48207698,
-18.50106357, -16.49170991, -2.621847509, -24.51692493, -23.09992585,
-5.024354584, -33.36304904, -11.70807348, 6.333754062, -48.42709612,
-1.479016179, -8.356837544, -51.06599299, 43.76290191, 69.60497152,
47.85626697, 48.40148701, 54.72183697, 42.15803639, 64.53057345,
54.16431559, -3.738275269, -0.702162205, 62.3610826, 46.67237156,
52.6199004, 38.52461269, -3.024278208, -2.750543439, 36.9814483,
7.451682716, -8.760148442, -3.765180494, -1.136421883, -14.44491027,
5.691458335, -3.45324277), upr = c(5.240836372, 37.87000052,
4.641313548, 45.78900302, 4.803724307, 4.90480648, 4.478722245,
5.761109093, 4.313617222, 56.03454831, 63.39459472, 5.380723907,
66.42315196, 38.69471212, 5.929503181, 24.26863757, 22.96666888,
15.39497062, 18.33183978, 12.43726586, -44.95529647, 15.30341063,
-11.7145643, -45.27693715, 15.47065264, 18.73758011, 7.060810304,
16.11369738, 35.08984413, 7.418906096, 16.89895412, 31.76093959,
12.59332098, 5.812628541, 15.60845954, -53.02277334, 15.79558941,
7.491216715, -53.24899333, -7.20850469, -4.714025155, 8.239174418,
-10.08900914, -8.484468677, 5.788326192, -22.07049016, -1.067588538,
17.35554378, -37.85561288, 9.523618892, 2.583503356, -40.19153745,
54.86525208, 80.7670875, 58.51447035, 58.51186974, 65.77755552,
52.63178784, 76.12196391, 65.28248671, 6.866994319, 9.448208163,
76.52620422, 57.60898119, 67.46157554, 49.97246872, 7.493369316,
7.983606156, 48.86667728, 18.34808305, 2.340520753, 7.908941555,
9.655004062, -2.717698989, 17.65828414, 7.903100071), p.adj = c(1,
6.01e-09, 1, 6.01e-09, 1, 1, 1, 1, 1, 6.01e-09, 6.01e-09, 1,
6.01e-09, 6.01e-09, 1, 6.01e-09, 6.01e-09, 5.3e-08, 6.01e-09,
0.00942458, 6.01e-09, 9.37e-07, 6.01e-09, 6.01e-09, 2.01e-07,
6.01e-09, 0.999999996, 0.003444593, 6.01e-09, 0.999998091, 6.82e-09,
6.01e-09, 0.005542999, 1, 8.35e-07, 6.01e-09, 0.005069855, 1,
6.01e-09, 6.01e-09, 1.11e-08, 0.98887677, 6.01e-09, 6.01e-09,
1, 6.01e-09, 0.002426513, 6.01e-09, 6.01e-09, 0.607765925, 0.985124611,
6.01e-09, 6.01e-09, 6.01e-09, 6.01e-09, 6.01e-09, 6.01e-09, 6.01e-09,
6.01e-09, 6.01e-09, 0.999999875, 0.235052039, 6.01e-09, 6.01e-09,
6.01e-09, 6.01e-09, 0.99960117, 0.995522809, 6.01e-09, 6.01e-09,
0.950823466, 0.999990337, 0.425228676, 1.54e-05, 6.1e-09, 0.999919873
)), class = "data.frame", row.names = c(NA, -76L))