R/dtf.R

In SRCnut/PCAux:

Defines functions dtf

Documented in dtf

dtf <- function(v){
  if(is.numeric(v))
    print("fuck off ya wanker")
  else
    print("coolio")
}