R/NoNAColumnsTab.R

In lwTools/agriTrf: Agricultural Transformation Package: data management, depiction and modelling

#'NoNAColumnsTab
#' @param dfData a data.frame object. Note that this is not a character string but the data.frame object itself. The parameter passed to the function should be without quotes (" ").
#' @return NoNAColumnsTab returns \code{dfData} with only those columns that have no NA values
#' @description NoNAColumnsTab takes as input a data.frame object (\code{dfData}) and returns a data.frame object with only those columns that have no NA values
#' @examples
#' NoNAColumnsTab(iris)
#' NoNAColumnsTab(warpbreaks)
#' @export
NoNAColumnsTab<- function(dfData)
{
  NoNAColumnsTab<-naValuesColumnsTable(dfData)[which(naValuesColumnsTable(dfData)[,2]==0),1:3]
  return(NoNAColumnsTab)
}