Closed BalancedmonkeY closed 10 months ago
To do internal testing of new command, you can do the following
test_data <- read.csv("Binary_wide_cov.csv") prepped_data <- PrepDataGemtc(test_data, "Binary", "covar.DiseaseDuration", "DiseaseDuration") reg_result <- RunCovariateRegression(prepped_data, 'random', 'shared', '1') summary(reg_result)
test_data <- read.csv("Binary_wide_cov.csv")
prepped_data <- PrepDataGemtc(test_data, "Binary", "covar.DiseaseDuration", "DiseaseDuration")
reg_result <- RunCovariateRegression(prepped_data, 'random', 'shared', '1')
summary(reg_result)
You may have to load the functions to your workspace manually (as well as those in DataWrangling.R)
DataWrangling.R
To do internal testing of new command, you can do the following
test_data <- read.csv("Binary_wide_cov.csv")prepped_data <- PrepDataGemtc(test_data, "Binary", "covar.DiseaseDuration", "DiseaseDuration")reg_result <- RunCovariateRegression(prepped_data, 'random', 'shared', '1')summary(reg_result)You may have to load the functions to your workspace manually (as well as those in
DataWrangling.R)