Reef structure survey

From BioDivBorneo2010

Jump to: navigation, search

Contents

Results

Legend:

  • Reef position
    • b = back reef
    • m = mid reef
    • s = crest
  • Coral type:
    • Br = Branching
    • En = Encrusting
    • Fo = Foliate
    • Ma = Massive
    • Mu = Mushroom
    • Ro Rock
    • Ru = Rubble
    • Sa = Sand
    • Su = Submassive
Coral cover vs. position on reef

R analysis

struct <- read.table("struct", sep="|")
s2 <- data.frame(c(rep("back",36),rep("mid",36),rep("crest",36)),struct$V1, struct$V2, c(struct$V3,struct$V4, struct$V5))
colnames(s2) <- c("pos","grp","type","cov")
par(cex=0.7)
s2$pos2 <- c(rep("back",36),rep("mid",36),rep("sea",36))
jpeg(width=1200,height=400)
boxplot(s2$cov ~ s2$pos2+s2$type, names=c("bBr","mBr","sBr","bEn","mEn","sEn","bFo","mFo","sFo","bMa","mMa","sMa","bMu","mMu","sMu","bRo","mRo","sRo","bRu","mRu","sRu","bSa","mSa","sSa","bSu","mSu","sSu"), ylab="segment length (m)", xlab="class (posType)")
dev.off()

s2$cornot[s2$type == "Massive"] <- "coral"
s2$cornot[s2$type == "Submassive"] <- "coral"
s2$cornot[s2$type == "Encrusting"] <- "coral"
s2$cornot[s2$type == "Branching"] <- "coral"
s2$cornot[s2$type == "Mushroom"] <- "coral"
s2$cornot[s2$type == "Foliate"] <- "coral"
s2$cornot[is.na(s2$cornot)] <- "not"
s3 <- aggregate(s2$cov, list(s2$pos2,s2$grp,s2$cornot), sum)
colnames(s3) <- c("pos", "grp", "cor", "cov")
s4 <- s3[s3$cor=="coral",]
summary(glm(s4$cov/10 ~ as.factor(s4$pos), family=binomial))

jpeg()
plot(s4$cov/10 ~ as.factor(s4$pos), xlab="Position", ylab="Coral cover proportion")
dev.off()

Data

Please include your data here. Please just add all the measurements of each class to give a summary in meters (should add to 10) for Reef flat, Back reef, Reef crest. E.g.:

Massive|2.4|0|3.1

Group 1 (persons 1-5)

  • Massive|.2|0|2.7
  • Submassive|.5|0|0
  • Encrusting|0|0|0
  • Branching|0|0|0
  • Mushroom|0|0|.3
  • Foliate|0|0|0
  • Rubble|2.5|0|6.8
  • Sand|6.8|1.7|.2
  • Rock|0|8.3|0

Group 2 (persons 6-10)

  • Massive|.51|3.01|.30
  • Submassive|1.07|0|.10
  • Encrusting|.25|1.06|0
  • Branching|0|.48|.20
  • Mushroom|.60|.30|0
  • Foliate|.87|.41|0
  • Rubble|5.76|3.45|2.20
  • Sand|.50|.10|7.20
  • Rock|.30|0|0

Group 3 (persons 11-15)

  • Massive|0.45|0|0.65
  • Submassive|0|0|0
  • Encrusting|1.8|0|1.85
  • Branching|1.20|0.2|1.15
  • Mushroom|0|0|0.55
  • Foliate|0|0|0
  • Rubble|5.0|0|4.0
  • Sand|1.55|9.4|0.8
  • Rock|0|0.4|0

Group 4 (persons 16-20)

  • Massive|0|0.45|1.5
  • Submassive|0|0.85|0.7
  • Encrusting|0|0|0.7
  • Branching|1|0.05|1.4
  • Mushroom|0|0|1.6
  • Foliate|0|0.2|0
  • Rubble|1.1|4.45|1.7
  • Sand|7.9|3.6|0.1
  • Rock|0|0.4|2.3