if (is_netmhc2pan_installed()) {
fasta_filename <- system.file(
"extdata", "example.fasta", package = "netmhc2pan"
)
run_netmhc2pan(fasta_filename)
# Two alleles
alleles <- c("DRB1_0101", "DRB1_0102")
# Run NetMHCpan with these two alleles
run_netmhc2pan(fasta_filename, alleles = alleles)
}
Run the code above in your browser using DataLab