r history