W3School TIY Editor

thislist <- list("apple", "banana", "cherry") append(thislist, "orange", after = 2)