edited "Derive... .R"