[R-br] Resolvendo uma distribuição Uniforme SIMPLES.

Boa noite! Preciso resolver uma distribuição Uniforme informando sua densidade e sua E(x) porém sem utilizar os comandos prontos do R. como por ex dunif. No caso, vou ter que dar valores para a e b (limite inferior e superior) a=2 b=3 , por ex. E terei que colocar um comando para que o usuário insira o valor de x. sendo que a fdp ou f(x)=1(sqrt(b-a)) para a<=x<=b e f(x)=0 , caso contrário. Ou seja, pra x<=a || x>=b e a E(x)= b+a(sqrt(2)) Portanto tenho que fazer um comando para descobrir a f(x) e a E(x) utilizando somente comandos como while, if, else,for, etc. Alguém consegue me ajudar? Estou desesperada já, rs. Att, Jackeline.