library(tidyverse)
linear <- function(x) x
quadratic <- function(x) (x - pi/2)^2 - pi/2
sinusoidal <- function(x) sin(x)
(mylist <- c(linear,quadratic,sinusoidal) %>%
purrr::set_names(c("linear","quadratic","sinusoidal")) %>%
purrr::map(~.))
but it seems a somewhat artificial requirement, given that we start with a vector of functions, and go to a named list, why go through the effort, why not a named vector ?
(myvec <- c(linear,quadratic,sinusoidal) %>%
purrr::set_names(c("linear","quadratic","sinusoidal")))