DSolve[Derivative[2][y][x] == -2*y[x] + Cot[2*x]*Derivative[1][y][x],y[x],x]