Find the node before the target value and rewire its next pointer so the target node leaves the chain.

Algorithm

The replay labels nodes by value, such as node(20), and never exposes object identity or memory addresses. This R DSA implementation uses the same small chain as the rest of the DSA track.

predecessor Deletion needs the node before the one being removed.
rewiring The predecessor skips the target and points at the target's next node.

Basic Implementation

basic.R
Replay: real traced execution (multi-file project)
node <- function(value, next_node = NULL) {
  list(value = value, nxt = next_node)
}

render <- function(head) {
  parts <- c()
  cursor <- head
  while (!is.null(cursor)) {
    parts <- c(parts, as.character(cursor$value))
    cursor <- cursor$nxt
  }
  paste0(paste(parts, collapse = " -> "), " -> null")
}

head <- node(10, node(20, node(30, node(40))))
target <- 30
head <- node(10, node(20, node(40)))
cat(render(head), "\n", sep = "")
  1. head ← 10 -> 20 -> 30 -> 40 -> null, target ← 30

    1node <- function(value, next_node = NULL) {2  list(value = value, nxt = next_node)
    values this step10 -> 20 -> 30 -> 40 -> nullhead30target
  2. cursor ← node(20)

    7cursor <- head8while (!is.null(cursor)) {9  parts <- c(parts, as.character(cursor$value))
    values this stepnode(10) node(20)cursor
  3. cursor.next ← node(40)

    1node <- function(value, next_node = NULL) {2  list(value = value, nxt = next_node)3}
    values this stepnode(30) node(40)cursor.next
  4. stdout ← 10 -> 20 -> 40 -> null

    1node <- function(value, next_node = NULL) {2  list(value = value, nxt = next_node)
    values this step10 -> 20 -> 40 -> nullstdout10 -> 20 -> 40 -> nullhead

Complexity

  • Time: O(n)
  • Space: O(1)

Implementation notes

  • Keep the explicit node and pointer/reference operations; array shortcuts hide the linked-list state this lesson is meant to replay.
  • The final output prints the chain in a deterministic a -> b -> null form for cross-language comparison.