locNormCstData: Centile curves using local polynomial compared to noise data

In HugoBrtn/quantCurves: Estimate quantile curves

Description

Centile curves using local polynomial compared to noise data

Usage

locNormCstData(
  x,
  y,
  bandwidth.method,
  cents = c(0.03, 0.25, 0.5, 0.75, 0.97),
  data,
  leg = FALSE
)

Arguments

x	the explanatory variable - numeric
y	the response variable - numeric
bandwidth.method	the method chosen to calculate bandwidth. Could be cross validation or Plug-in. Default is set to CV.
cents	A numeric vector that represents the centiles calculated. Default is set to cents=c(0.03,0.25,0.5,0.75,0.97) )
data	the noise data we want to compare
leg	Boolean. Should the legend be desplayed (TRUE) or not (FALSE).

Value

Plots centile curves with local constant polynomial and displays them on the same figure as the noise data to be compared

Examples

#create an example data frame
example<-data.frame(sample(30:42,50,rep=TRUE),sample(800:5000,50,rep=TRUE))
colnames(example)<-c("Gestational Age in weeks","Weight in gramms")
x<-example$`Gestational Age in weeks`
y<-example$`Weight in gramms`
abnormal<-data.frame(sample(30:42,10,rep=TRUE),sample(800:5000,10,rep=TRUE))
colnames(abnormal)<-c("Gestational Age in weeks","Weight in gramms")
locNormCstData(x,y,bandwidth.method="Plug-in",cents=c(0.03,0.25,0.50,0.75,0.97),data=abnormal)

HugoBrtn/quantCurves documentation built on Dec. 31, 2021, 12:01 a.m.