# NOT RUN {
#Reading pdb and dcd files
pdb <- system.file("rotamer/toy_coordinates.pdb", package= "Bios2cor")
trj <- system.file("rotamer/toy_dynamics.dcd", package= "Bios2cor")
#Reading conversion file
conversion_file <- system.file("rotamer/dynameomics_rotamers.csv", package= "Bios2cor")
#Creating the dynamic_structure and rotamers objects
wanted_frames <- seq(from = 1, t = 40, by = 5)
dynamic_structure <- dynamic_structure(pdb, trj, wanted_frames)
rotamers <- angle2rotamer(dynamic_structure, conversion_file)
#creating the dynamic_entropy object
dynamic_entropy <- dynamic_entropy(rotamers)
# }
Run the code above in your browser using DataLab