R/setRownames.R

Defines functions setRownames

setRownames <- function(dat) {
    if (nrow(dat) > 0) {
        return(`row.names<-`(dat, 1:nrow(dat)))
    } else {
        return(dat)
    }
}

Try the MTurkR package in your browser

Any scripts or data that you put into this service are public.

MTurkR documentation built on May 29, 2017, 11:09 p.m.