# \donttest{
# One dataset
OlinkAnalyze:::olink_norm_input_check_df_cols(
lst_df = list(
"p1" = npx_data1
) |>
lapply(function(l_df) {
l_df |>
dplyr::select(
-dplyr::any_of(c("Normalization"))
)
})
)
# Two datasets
OlinkAnalyze:::olink_norm_input_check_df_cols(
lst_df = list(
"p1" = npx_data1,
"p2" = npx_data2
) |>
lapply(function(l_df) {
l_df |>
dplyr::select(
-dplyr::any_of(c("Normalization"))
)
})
)
# Multiple datasets
OlinkAnalyze:::olink_norm_input_check_df_cols(
lst_df = list(
"p1" = npx_data1,
"p2" = npx_data2,
"p3" = npx_data1,
"p4" = npx_data2
) |>
lapply(function(l_df) {
l_df |>
dplyr::select(
-dplyr::any_of(c("Normalization"))
)
})
)
# }
Run the code above in your browser using DataLab