> solve({A*evalf(BesselJ(1,1))+B*evalf(BesselY(1,1))=1,
> A*evalf(BesselJ(1,2))+B*evalf(BesselY(1,2))=2},{A,B});

                 {B = 0.7519643714, A = 3.607413010}

> y:=x->3.607413011*BesselJ(1,x)+0.7519643720*BesselY(1,x);

   y := x -> 3.607413011 BesselJ(1, x) + 0.7519643720 BesselY(1, x)

> plot(y(x),x=1..2);

> 
