A r-mode in a magnetic rotating spherical layer: application to neutron stars