Question: Algsubs does not work

How would you do the substitution below?

eq1 := ((2*mu[2]-2)*R[S]*B[n]*lambda[0]*mu[3]*n^2*N[p]^2+(-2*mu[2]+2*mu[2]^2)*R[S]*B[n]*lambda[0]*n^2*N[p]^2+d^2)/(d^2+b*n);

 eq2 := algsubs((2*mu[2]-2)*R[S]*B[n]*lambda[0]*mu[3]*n^2*N[p]^2 = q11, eq1);

Thanks

Please Wait...