Ross Ihaka y Robert Gentleman
Douglas Bates (USA) - Roger Bivand (Norway) -Jennifer Bryan (Canada) - John Chambers (USA) - Di Cook (Australia) - Peter Dalgaard (Denmark) - Dirk Eddelbuettel (USA) - John Fox (Canada) - Robert Gentleman (USA) - Bettina Grün (Austria) - Frank Harrell (USA) - Kurt Hornik (Austria) - Torsten Hothorn (Switzerland) - Stefano Iacus (Italy) - Ross Ihaka (New Zealand) - Julie Josse (France) - Tomas Kalibera (Czechia, USA) - Michael Lawrence (USA) - Friedrich Leisch (Austria) - Uwe Ligges (Germany) - Thomas Lumley (USA, New Zealand) - Martin Mächler (Switzerland) - Martin Morgan (USA) - Paul Murrell (New Zealand) - Balasubramanian Narasimhan (USA) - Martyn Plummer (France) - Deepayan Sarkar (India) - Marc Schwartz (USA) - Duncan Temple Lang (USA) - Luke Tierney (USA) - Heather Turner (UK) - Simon Urbanek (Germany, USA) - Bill Venables (Australia) - Hadley Wickham (USA) - Achim Zeileis (Austria)
library(vegan)
dat <- read.table("/home/santiago/mandevilla.txt", header = TRUE)
## multidimensional scaling
m1 <- metaMDS(dat2, dist = "bray", k = 2)
m1
## figura
plot(m1, "sites", type = "n")
points(m1$points[,1],
m1$points[,2],
pch = c(rep(1, 4), rep(19, 4), rep(19, 3),
rep(1, 5), rep(19, 4), rep(1, 4)),
col = c(rep("blue4", 4), rep("blue4", 4), rep("red4", 3),
rep("red4", 5), rep("green4", 4), rep("green4", 4)))
## agregar compuestos
points(m1, "species", pch = 2, cex = 0.7)
## agregar nombres de compuestos
text(m1$species[, 1], m1$species[, 2] - 0.1, colnames(dat2), cex = 0.6)
## anosim
tipo <- as.factor(c(rep("hib", 8), rep("lax", 8), rep("pen", 8)))
a1 <- anosim(dat = dat2, grouping = tipo, distance = "bray", permutations = 9999)
summary(a1)
perm <- permustats(a1)
densityplot(perm)
plot(a1)
library(hdrcde)
x <- c(rnorm(200,0,1),rnorm(200,4,1))
y <- c(rnorm(200,0,1),rnorm(200,4,1))
par(mfrow=c(1,2))
plot(x,y, pch= "+", cex=.5)
hdr.boxplot.2d(x,y)
El lenguaje R y el software donde lo visualizamos son dos cosas diferentes.
Trabajo Final: Construcción de una rutina de resolución de problemas estadísticos y gráficos. Entrega de un informe.