set.seed(123)
sim_object <- simulate_twoOmicsData(
vector_features = c(4000, 3000),
n_samples = 100,
n_factors = 2,
snr = 2.5,
num.factor = "multiple",
advanced_dist = "mixed"
)
output_obj = as_multiomics(sim_object)
# Merged (concatenated) heatmap
plot_simData(output_obj, data = "merged", type = "heatmap")
# Single omic with reproducible permutation
plot_simData(output_obj, data = "omic2", permute = TRUE, permute_seed = 123)
Run the code above in your browser using DataLab