require(ape, quietly = TRUE, save = FALSE) # added line
woodmouse <- read.dna("woodmouse.txt", format = "sequential")