First attempt

R SEAD package