Error connecting Kerberos to Hive2 using JDBC in R

Question

I used to be able to run R code to pull out a Hive table using JDBC under Cloudera CDH 4.5. However, now I received below the connection error after upgrading to CDH5.3 (failed to find Kerberos tgt), it seems that it can no longer connect to the cluster. The Hive server has been upgraded to the hive2 / Beeline server. See below code and error log. Any experience and recommendations on how to fix this? Thanks.

options(width=120)                                                  
options( java.parameters = "-Xmx4g" )              
query="select * from Hive_table"   
user="user1"  
passw="xxxxxxx"  
hiveQuerytoDataFrame<-function(user,passw,query){
  library(RJDBC)           
  .jaddClassPath("/opt/cloudera/parcels/CDH/lib/hive/lib/hive-jdbc-0.10.0-cdh5.3.3.jar")    
  drv <- JDBC("org.apache.hive.jdbc.HiveDriver",classPath = list.files("/opt/cloudera/parcels/CDH/lib/",pattern="jar$",full.names=T, recursive = TRUE),identifier.quote="`")        
`conn <- dbConnect(drv,"jdbc:hive2://server.domain.<>.com:10000/default;principal=hive/[e-mail]",user,passw)                        
  #dbListTables(conn)          
  jdbc_out<-dbGetQuery(conn,query)             
  str(jdbc_out)     
  return(jdbc_out)   
}  `

**Log:
ERROR transport.TSaslTransport: SASL negotiation failure
javax.security.sasl.SaslException: GSS initiate failed [Caused by GSSException: No valid credentials provided (Mechanism level: Failed to find any Kerberos tgt)]**`