Mathematicaで

x J0(x) = 2 J1(x) [J1(x), J0(x)はベッセル関数BesselJ[n,x])

を満たすxを求めるにはどうすればいいですか？

NSolveは使えませんでした。