Create inr-functions-multsubj.r