d<-
structure(list(trat = c("T2", "T2", "T3", "T2", "T3", "T1", "T1",
"T1", "T1", "T3", "T2", "T2", "T1", "T1", "T3", "T2", "T2", "T3",
"T1", "T2", "T3", "T2", "T2", "T1", "T2", "T3", "T1", "T2", "T2",
"T3", "T2", "T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1",
"T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1",
"T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1", "T1",
"T2", "T2", "T2", "T2", "T2", "T2", "T2", "T2", "T2", "T2", "T2",
"T2", "T2", "T2", "T3", "T3", "T3", "T3", "T3", "T3", "T3"),
zona = c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3), Hospedero = c("D. tabernella",
"D. tabernella", "D. busckella", "D. busckella", "D. tabernella",
"D. tabernella", "D. tabernella", "D. busckella", "D. tabernella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. tabernella", "D. busckella", "D. busckella", "D. tabernella",
"D. tabernella", "D. tabernella", "D. tabernella", "D. busckella",
"D. busckella", "D. busckella", "D. busckella", "D. indigenella",
"D. indigenella", "D. indigenella", "D. busckella", "D. busckella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. busckella", "D. indigenella", "D. saccharalis", "D. busckella",
"D. saccharalis", "D. busckella", "D. tabernella", "D. tabernella",
"D. busckella", "D. tabernella", "D. indigenella", "D. busckella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. busckella", "D. busckella", "D. saccharalis", "D. tabernella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. busckella", "D. indigenella", "D. busckella", "D. busckella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. busckella", "D. busckella", "D. busckella", "D. busckella",
"D. busckella", "D. busckella"), Parasitoide = c("Genea jaynesi",
"Genea jaynesi", "Lydella minense", "Genea jaynesi", "Lydella minense",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Lydella minense", "Genea jaynesi", "Genea jaynesi",
"Cotesia flavipes", "Cotesia flavipes", "Lydella minense",
"Genea jaynesi", "Genea jaynesi", "Lydella minense", "Cotesia flavipes",
"Genea jaynesi", "Lydella minense", "Genea jaynesi", "Genea jaynesi",
"Cotesia flavipes", "Genea jaynesi", "Lydella minense", "Cotesia flavipes",
"Genea jaynesi", "Genea jaynesi", "Lydella minense", "Genea jaynesi",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Cotesia flavipes", "Cotesia flavipes",
"Cotesia flavipes", "Genea jaynesi", "Genea jaynesi", "Genea jaynesi",
"Genea jaynesi", "Genea jaynesi", "Genea jaynesi", "Genea jaynesi",
"Genea jaynesi", "Genea jaynesi", "Genea jaynesi", "Genea jaynesi",
"Genea jaynesi", "Genea jaynesi", "Genea jaynesi", "Lydella minense",
"Lydella minense", "Lydella minense", "Lydella minense",
"Lydella minense", "Lydella minense", "Lydella minense"),
Estado = c("Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada", "Parasitada",
"Parasitada", "Parasitada", "Parasitada", "Parasitada")), row.names = c(NA,
-83L), class = c("tbl_df", "tbl", "data.frame"))