finished draft of intro to r