how to write R code that calculate correlation coefficient for 2 numbers

Question

I have X = [2,3,5,10,8,5] Y = [7,6,9,1,6,3] variables I want to calculate correlation coefficient between them but without using "cor(X,Y)" function how can I achi