У меня проблемы с написанием сценария для редактирования координат xyz файла PDB, но файл PDB не выводится. Подскажите, пожалуйста, как это сделать.
библиотека (bio3d)
xxx2 <- read.pdb ('xxx2.pdb') </p>
df <- as.data. frame (xxx2 $ atom) </p>
df_reposition <- df </p>
df_reposition $ x <- df_reposition $ x - 20 </p>
df_reposition $ y <- df_reposition $ y - 40 </p>
df_reposition $ z <- df_reposition $ z - 70 </p>
write.pdb (df_reposition, file = «xxx2_reposition.pdb»)