Ultrasonic anisotropic P-wave attenuation of shales under elevated pressures