# Basic Usage with Mock Data
# Create a mock PipelineResults object with minimal data
mock_pipeline_results <- new("PipelineResults",
inbuilt_feature_importance = list(
"FeatureSet1" = data.frame(feature = c("feature1", "feature2")),
"FeatureSet2" = data.frame(feature = c("feature2", "feature3"))),
permutation_importance = list(
"FeatureSet1" = data.frame(feature = c("feature3", "feature4")),
"FeatureSet2" = data.frame(feature = c("feature1", "feature4"))))
# Calculate overlap coefficients without custom lists
overlap_results <- calculate_overlap_coefficients(mock_pipeline_results)
# Including Custom Lists
# Create custom feature lists
custom_feature_lists <- list("CustomList1" = c("feature5", "feature6"),
"CustomList2" = c("feature6", "feature7"))
# Calculate overlap coefficients with custom lists
overlap_results_custom <- calculate_overlap_coefficients(mock_pipeline_results,
custom_feature_lists)
Run the code above in your browser using DataLab