# NOT RUN {
testSettings<-generateSettings(standard="AdAM")
#pass ($valid == TRUE)
safetyGraphics:::checkSettingProvided(key=list("id_col"),
settings=testSettings)
#fails since filters aren't specified by default
safetyGraphics:::checkSettingProvided(key=list("filters"),
settings=testSettings)
#fails since groups aren't specified by default
safetyGraphics:::checkSettingProvided(key=list("groups",1,"value_col"),
settings=testSettings)
# }
Run the code above in your browser using DataLab