load(system.file("extdata",
"variabilityDemoNHDSdiagcode1-phewascode.RData",
package="EHRtemporalVariability"))
igtTrajectory <- estimateIGTTrajectory( igtProjection = igtProjs[[1]] )
igtTrajectory$points
Run the code above in your browser using DataLab