# NOT RUN {
#remember to remove it
# }
# NOT RUN {
pos_train_ultrahard <- read_uniprot("pos_ultrahard_data.txt", euk = TRUE)
model1 <- train_hsmm(pos_train_ultrahard, aa_group = aaaggregation)
predict(model1, benchmark_dat[1L:5])
# }
Run the code above in your browser using DataLab