R/Psedentary.R

Defines functions Psedentary

#psedentary (unweighted mean & median values)
  
Psedentary<-function(data)
{
data%>%
mutate(cln_sedentary = if_else(p16cln==1, 1, 2, missing = 2))%>%
  
  return(data)
}
mhajihos/GPAQ documentation built on Nov. 21, 2023, 6:52 p.m.