R/FreelistTable.Rank.R

Defines functions FreeListTable.Rank

Documented in FreeListTable.Rank

#' @export
#' 
FreeListTable.Rank <- function(mydata,CODE="CODE",Salience="Salience",Order="Order", Subj="Subj",subjNum,CODEnum){
  if(any(mydata[,Subj]==subjNum & mydata[,CODE]==CODEnum) ){    
    return(min(mydata[which(mydata[,Subj]==subjNum & mydata[,CODE]==CODEnum),Order]))
  }
  else{
    return(0)
  }
}
alastair-JL/AnthroTools documentation built on March 7, 2024, 11:59 p.m.