Updated inline r code for Fulton K