O erro e' porque vc passou um numeric(5) no lugar de integer(5). Deve ser integer() porque r (na subroutine) e' integer... tente: .Fortran('contador', n=as.integer(5), r=integer(5))