Equivalent function to Excel's BETADIST() in R

I am looking for the equivalent function to BETADIST(). I tried dbeta and dbetadist but these do not give the same result as Excel's BETADIST.

BETADIST(1/13,2,4) = 0.050583
dbeta(1/13,2,4, log=F) = 1.210042

What did I miss? Thank you for your time.