three_col_check(colname1 = "Perf_Lvl", colname2 = "Var1", colname3 = "Var2",
data = dataset, fun = function(col1, col2, col3){
col1 %in% c("Basic", "Intermediate", "Advanced") |
(is.na(col1) & (col3 %% 2 ==0) & (col2 %% 2 ==1 ))
})
Run the code above in your browser using DataLab