clc
clear
disp('Zhoria Renfus')

y = x^2 - 4*x sin(x)

x = linspace(-5, 5, 1000)

y = x.^2 - 4*x.*sin(x)

plot(x, y)

title('Plot of y = x^2 - 4x sin(x)')
xlabel('x')
ylabel('y')
grid on