Learn R Programming

simboot (version 0.2-8)

saproDipGM: Abundance data of Diptera with saprophagous larvae

Description

In a field trial with 6 complete blocks, three treatments have been applied: a genetically modified crop variety was cultivated without insecticide treatment (GM), its near-isogenic counterpart (i.e. not genetically modified but otherwise genetically closely related to the GM crop) has been cultivated without insecticide treatment (Iso), and the near-isogenic variety has been cultivated with insecticide treatment (Ins). In each of the 18 plots, two emergence traps have been placed and Diptera with saprophagous larvae were classified to the species level and counted. A total number of 25 different species has been observed and included in the present data set. For each plot, the summed counts of each species over one cultivation period (in 2002) and the two traps is given in the columns Acor, ..., Tnud. Among others, one question in this trial was: Does the genetic modified variety effect biodiversity of the (ecologically important, non-target) species in comparison to the isogenic variety (as a negative control) and in comparison to the insecticide treated plants (as a positive control)?

Usage

data(saproDipGM)

Arguments

Format

A data frame with 18 observations on the following 27 variables.

Block

a numeric vector, values 1,...,6 indicate the blocks of the trial

Variety

a factor, distinguishing the 3 treatment levels: GM (genetically modified, no insecticide), Ins (not genetically modified, insecticide treatment) , and Iso (not genetically modified, no insecticide)

Acor

a numeric vector of counts of the first species

Arub

a numeric vector...

Aaph

a numeric vector

Bbre

a numeric vector

Btri

a numeric vector

Burt

a numeric vector

Bvag

a numeric vector

Bill

a numeric vector

Ccru

a numeric vector

Cmir

a numeric vector

Cvag

a numeric vector

Dnit

a numeric vector

Dand

a numeric vector

Lcin

a numeric vector

Lcas

a numeric vector

Malt

a numeric vector

Moli

a numeric vector

Mluc

a numeric vector

Mtox

a numeric vector

Ppha

a numeric vector

Sato

a numeric vector

Spal

a numeric vector

Sate

a numeric vector

Sleu

a numeric vector

Tnud

a numeric vector

Examples

Run this code
data(saproDipGM)

str(saproDipGM)

# load("D:/Mueller/Biodiv/data/saproDipGM.rda")

# Display data as a mosaicplot

# Matrix of counts with appropriate names
COUNTS<-as.matrix(saproDipGM[,3:27])
SPECNAM<-names(saproDipGM)[3:27]
colnames(COUNTS)<-SPECNAM
rownames(COUNTS)<-saproDipGM[,"Variety"]

# Assign colors and order by decreasing total abundance
COL<-grey(c(0,2,4,6,8,1,3,5,7)/8)
DMO<-COUNTS[,order(colSums(COUNTS), decreasing=TRUE)]

# Mosaicplot
par(mar=c(4,2,1,1))
mosaicplot(DMO, col=COL, las=2, off=15, main="", cex=1.1)
mtext("A", side=3, line=-1.5, adj=0, cex=2)

Run the code above in your browser using DataLab