Changed string to character to be more R friendly.