Create CastCharacter.R