test header.R shinyAce issue