Cómo contar los valores verdaderos en r

a = c(NA,T,F,F)
sum(a, na.rm=TRUE) # best way to count TRUE values #which gives 1. 
Rocku0