change introduction text
add function Alligator.R