Title

This is an R Markdown document. Markdown is a simple formatting syntax for authoring web pages (click the MD toolbar button for help on Markdown).

When you click the Knit HTML button a web page will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

## Loading required package: plyr

## 
## Attaching package: 'reshape'
## 

## The following object(s) are masked from 'package:plyr':
## 
##     rename, round_any
## 

## 
## Attaching package: 'reshape2'
## 

## The following object(s) are masked from 'package:reshape':
## 
##     colsplit, melt, recast
## 

## Loading required package: codetools

## Loading required package: parser

## Loading required package: Rcpp

## Loading required package: MASS

## Loading required package: nnet

DATA Slideshow

Start R chunk 1

wdproj <- getwd()
dpath <- "clustdata"
source(paste(wdproj, "readClustMap.R", sep = "/"), echo = TRUE)

## 
## > readClustMap <- function() {
## +     wdproj <- getwd()
## +     dpath <- "clustdata"
## +     cmpath <- "clustmap"
## +     crpath <- "clustranges"
## +     mapfl .... [TRUNCATED] 

source(paste(wdproj, "inputClusterData.R", sep = "/"), echo = TRUE)

## 
## > inputClusterData <- function(filestr, wdproj, dpath) {
## +     hc_1000rep6 <- cbind(rep(c("140", "166", "280", "333", "355", 
## +         "374", "408",  .... [TRUNCATED] 

source(paste(wdproj, "computeSPeffects.R", sep = "/"), echo = TRUE)

## 
## > computeSPeffects <- function(ssp) {
## +     widen <- function(data, variable) {
## +         as.matrix(cast(data, Cluster + tetgrp + ivcond + sbj ~ 
## +    .... [TRUNCATED] 

dfiles <- list.files(paste(wdproj, dpath, sep = "/"), pattern = ".txt")
dfilesz <- length(dfiles)

Chunk 2

## Warning message: NAs introduced by coercion

## Warning message: NAs introduced by coercion

Title

clust <- readClustMap()

## Loading required package: ascii

## 
## Attaching package: 'ascii'
## 

## The following object(s) are masked from 'package:reshape':
## 
##     expand
## 

Title