有没有办法以不同的方式处理第一个lapply元素？还是将其放在lapply结果的前面？

my_list <- list(a = 1, b = 2, c = 3)

lapply(my_list, function(x) {
  if (identical(x, my_list[[1]])) {
    # 处理第一个元素的特定操作
    # ...
  } else {
    # 默认操作
    # ...
  }
})

my_list <- list(a = 1, b = 2, c = 3)

result <- list()
for (i in seq_along(my_list)) {
  if (i == 1) {
    # 处理第一个元素的操作
    # ...
  } else {
    # 默认操作
    # ...
  }
  result[[i]] <- # 将处理结果添加到结果列表中
}