plz guide me how to apprximate in R.

hk=((log(1+2*(k^2)ARL0+2.332k))/(2*k))-1.166 #### i want to replace approximately equal instead of equal.