calculation

Hello!
My name is Saeed and i'm studying physics. I have a problem which ihope
someone can help me with it. I have an equation
.001422409738*R^(73/80)*(R^(1/2)-1)^(-13/40) == .04
i'm using the Solve function in Mathematica 3.0 to solve it for R, but
it calculats endlessly and takes very long time. the question is that
is there any way to optimize this equation or using another function in
Mathematica 3.0 to make it faster to calculate?
Regards