DSolve[Derivative[2][y][x] == -4*Csc[x]^3*Sin[3*x]*y[x],y[x],x]