adaptiveFromR