## Not run:
# # add suffix to stem
# shiftedStem("a", 100) == "a_shift_0100"
# shiftedStem("home/a", 100) == "home/a_shift_0100"
# shiftedStem("/home/a", 100) == "/home/a_shift_0100"
# shiftedStem(c("/home/a", "/home/b"), 100) == c("/home/a_shift_0100",
# "/home/b_shift_0100")
# ## End(Not run)
Run the code above in your browser using DataLab