## Not run:
# CIF <- "http://www.pdb.org/pdb/files/3GFT.cif"
# Fasta <- "http://www.uniprot.org/uniprot/P01116-2.fasta"
# KRAS.Positions <- get.Positions(CIF, Fasta, "A")
# data(KRAS.Mutations)
#
# #Calculate the required clusters
# SpaceClust(KRAS.Mutations, KRAS.Positions$Positions, radii.vector = c(1,2,3,4))
#
# ## End(Not run)
Run the code above in your browser using DataLab