When using the following simple code for calculating the confidence interval it gives minus in the environment while it should be postive.

#Calculate the confidence interval

SE <-- 4.466389/sqrt(5122)

sqrt_value <- sqrt(5122)

SE <- 4.466389 / sqrt_value

#Calculate the lowerbound

LB <-- 25.77734-1.96*SE

It gives -25.899 in the environent. Can someone help me with that?