← Back to branch summary

~ubuntu-branches/ubuntu/vivid/r-cran-genabel/vivid

« back to all changes in this revision

Viewing changes to R/ccfast.R

  • Committer: Package Import Robot
  • Author(s): Andreas Tille
  • Date: 2013-07-22 09:22:48 UTC
  • mfrom: (1.1.5)
  • Revision ID: package-import@ubuntu.com-20130722092248-xds9dpinjhbx3kho
Tags: 1.7-6-1
* New upstream version
* debian/control: Drop citation from long description because this
  information is provided in debian/upstream.

Show diffs side-by-side

added added

removed removed

Lines of Context:
R/ccfast.R
14
14
        cc <- phdata(data)[[y]]
15
15
 
16
16
        if (length(levels(as.factor(cc)))<2) stop("cc status is monomorphic!") 
17
 
        if (length(levels(as.factor(cc)))>2) stop("cc status has more then 2 levels!") 
 
17
        if (length(levels(as.factor(cc)))>2) stop("cc status has more than 2 levels!") 
18
18
        if (levels(as.factor(cc))[1] != 0 || levels(as.factor(cc))[2] != 1) stop ("cc is case-control status, with 0 as control and 1 as cases. No 0 and/or 1 found in the data")
19
19
 
20
20
        if (any(is.na(cc))) {