# NOT RUN {
data(mrna_data)
mrna_layer = make_layer(name="mrna",
mrna_data$group1$data, mrna_data$group2$data,
mrna_data$group1$identifiers,
mrna_data$group2$identifiers)
data(protein_data)
protein_layer = make_layer(name="protein",
protein_data$group1$data,
protein_data$group2$data,
protein_data$group1$identifiers,
protein_data$group2$identifiers)
con = make_connection("mrna", "protein", connect_on="gene_name")
return_errors(check_sensible_connections(con, layers=list(mrna_layer, protein_layer)))
# }
Run the code above in your browser using DataLab