A new conservative high-order accurate difference scheme for the Rosenau equation