Функция do.call в R неожиданное поведение со средним

Question

Я столкнулся с неожиданным поведением функции R do.call при объединении с функцией mean.

do.call(max, list(2,6,4))
6 # as expected 
do.call(min, list(2,6,4))
2 # as expected
do.call(sum, list(2,6,4))
12 # as expected
do.call(mean, list(2,6,4))
2 # should be 4!

Что мне здесь не хватает?