added HR calculation
added HR calculation
R calculation