longer object length is not a multiple of shorter object length using MAP2 function

Question

I am trying to generate plots per subject and lbtestcd using the following code. basically I am trying to iterate over two lists from a data frame using map2 function and my