#Reading pdb and dcd files
pdb <- system.file("rotamer/toy_coordinates.pdb", package= "Bios2cor")
trj <- system.file("rotamer/toy_dynamics.dcd", package= "Bios2cor")
#Creating dynamic_structure object
wanted_frames <- seq(from = 5, to = 40, by = 10)
dynamic_structure <- dynamic_structure(pdb, trj, wanted_frames)
#Creating rotamers object using conversion_file
conversion_file <- system.file("rotamer/dynameomics_rotamers.csv", package= "Bios2cor")
rotamers <- angle2rotamer(dynamic_structure, conversion_file)
#Creating correlation object for selected residues with OMES method
wanted_residues <- c("W")
omes_corr <- dynamic_omes(dynamic_structure, rotamers, wanted_residues)
Run the code above in your browser using DataLab