data(protein_data)
example_protein_layer <- make_layer(
name="protein",
data_groupA=protein_data$groupA[, c(-1,-2)],
data_groupB=protein_data$groupB[, c(-1,-2)],
identifiers_groupA=data.frame(
gene_name=protein_data$groupA$gene_name,
ref_seq=protein_data$groupA$ref_seq),
identifiers_groupB=data.frame(
gene_name=protein_data$groupB$gene_name,
ref_seq=protein_data$groupB$ref_seq))
Run the code above in your browser using DataLab