  Hi,
   
  any good trick to get the column names for title() aside from running lapply on the column indexes?
   
  Thanks
   
  Nick.
   
  apply(X[,numCols],2,function(x){
  nunqs <- length(unique(x))
  nnans <- sum(is.na(x))
  info <- paste("uniques:",nunqs,"(",nunqs/n,")","NAs:",nnans,"(",nnans/n,")")
  hist(x,xlab=info) 
  # --> title("???")
  })


 		
---------------------------------

	[[alternative HTML version deleted]]

