R testing

added normalization