---

%% Вариант 8

%% 1
t = 0.1:0.1:1;
x = cos(t).*log(t);
bar(t, x, 1.0)

%% 2
data = [24.1 17.4 10.9];
parts = zeros(size(data));
[mn, ind] = min(data);
parts(ind) = 1;
pie(data, parts)

%% 3
data = [0.9 1.0 1.1 1.2 1.4 2.4 3.0 3.3];
centers = [1.1 2.3 3.2];
hist(data, centers)

%% 4
x = -2*pi:pi/20:2*pi;
f = exp(x/9).*cos(x).^2;
g = 7*exp(-5*x).*sin(x).^2;
plot(x, f, x, g)

%% 5
x = 0.5:0.01:3;
f = x.^(-3);
F = 1000*(x + 3.5).^(-8);
plotyy(x, f, x, F)

%% 6
x = 0.1:0.01:5;
f = log(0.8*x);
g = sin(log(x));
semilogx(x, f, x, g)

%% 7
x1 = -2*pi:0.01:-pi;
y1 = pi*sin(x1);

x2 = -pi:0.01:pi;
y2 = pi - abs(x2);

x3 = pi:0.01:2*pi;
y3 = pi*sin(x3).^3;

x = [x1 x2 x3];
y = [y1 y2 y3];

plot(x, y)

%% 8
[X, Y] = meshgrid(-1:0.05:1, 0:0.05:1);
Z = 9*sin(7*pi*X).*cos(5.3*pi*Y).*(1 - X.^2).*Y.*(1 - Y);

mesh(X, Y, Z)
hidden off
hidden on

figure
surf(X, Y, Z)

figure
surf(X, Y, Z)
shading interp

figure
surf(X, Y, Z)
colorbar

%% 9
levels = 0:0.08:0.5;
contour3(X, Y, Z, levels)
colorbar