output_obj <- simulate_twoOmicsData(
vector_features = c(4000, 3000),
n_samples = 100,
n_factors = 2,
signal.samples = NULL,
signal.features.one = NULL,
signal.features.two = NULL,
snr = 2.5,
num.factor = "multiple",
advanced_dist = "mixed"
)
output_obj <- as_multiomics(output_obj)
plot_weights(
sim_object = output_obj,
factor_num = 1,
omic = 1,
type = "scatter",
show.legend = FALSE
)
plot_weights(
sim_object = output_obj,
factor_num = 2,
omic = 2,
type = "histogram"
)
Run the code above in your browser using DataLab