Как получить максимальное значение в массиве меньше, чем каждое значение другого массива (R)

Question

У меня есть два фрейма данных Event1 с id столбцов, время, Event2_time и Event2 с id столбцов, время. Оба упорядочены по убыванию по времени. Я пытаюсь установить Event1.Event2time для каждой строки так, чтобы Event2_time = max (Event2.time

 var event1 = Event1.OrderByDescending(a => a.time);
 var event2 = Event2.OrderByDescending(b => b.time);
        foreach(Event1 e1 in event1)
        {  e1.Event2_time = event2.Where(e => e.time < e1.time ).FirstOrDefault().time;

        }

Как я могу сделать это в R (я использую dplyr)? Хаим