Форум программистов, компьютерный форум, киберфорум
Matlab
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 15.03.2015
Сообщений: 4
1

Построить усечённый конус

03.12.2015, 15:33. Просмотров 1386. Ответов 1
Метки нет (Все метки)

Приветвую!

Задача построить усечённый конус. Дано: радиусы большого и малого оснований, координаты цента большого
основания, высота по оси Z

Вот что я смог сделать:
Matlab M
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
r1 = str2double(get(handles.edit5,'string')); %Нижнее основание
r2 = str2double(get(handles.edit6,'string')); %Верхнее основание
x0 = str2double(get(handles.edit7,'string')); % Координата точки
y0 = str2double(get(handles.edit8,'string')); % Координата точки
z0 = str2double(get(handles.edit14,'string')); % Координата точки
h = str2double(get(handles.edit12,'string')); % Высота
 
h1=r1/h;
h2=r2/h;
z2=h+z0;
x1 = -r1:h1:r1;
x2 = -r2:h2:r2;
x = [-r1:h1:r1;-r2:h2:r2]-x0;
y1=[sqrt(r1^2-x1.^2); sqrt(r2^2-x2.^2)]-y0;
y2=[-sqrt(r1^2-x1.^2); -sqrt(r2^2-x2.^2)]-y0;
z1(1:length(x1)) = z0;
z2(1:length(x1)) = z2;
z = [z1;z2];
 
surf(x,y1,z,x,'EdgeColor','none')
surf(x,y2,z,x,'EdgeColor','none')
set(gca,'PlotBoxAspectRatio',[1 1 1]);
meshc(x,y,z);
Но при данных R = 5; r = 2; x=y=z=1; h=3 получаю немного не то.
0
Миниатюры
Построить усечённый конус  
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.12.2015, 15:33
Ответы с готовыми решениями:

Как построить в matlab усеченный конус
Подскажите, пожалуйста, как построить в matlab усеченный конус, радиус нижнего основания 5, радиус...

Усечённый конус с вводом радиусов
Всех приветствую! Проблема возникла такая. Нужно построить усечённый конус. Радиус малого и...

Построить конус, заданный уравнением, в matlab.
как задать конус с уравнением x^2-y^2+z^2=0 просто если выразить одну из переменных и строить...

Как построить конус 3d?
Добрый день! Помогите, пжлт, построить конус в маткаде.

1
Эксперт по математике/физике
3360 / 1886 / 568
Регистрация: 09.04.2015
Сообщений: 5,296
04.12.2015, 13:07 2
Matlab M
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
%Конус
clc
clear all
r1=5;
r2=2;
h=5;
z0=0;
y0=0;
x0=0;
n=20;
 
h1=r1/n;
h2=r2/n;
z2=h+z0;
x10 = -r1:h1:r1;
x11 = r1:-h1:-r1;
x20 = -r2:h2:r2;
x21 = r2:-h2:-r2;
xx1 = [x10 x11];
xx2 = [x20 x21];
x=[xx1;xx2];
y10=sqrt(r1^2-x10.^2); y11=-sqrt(r1^2-x11.^2);
y20=sqrt(r2^2-x20.^2); y21=-sqrt(r2^2-x21.^2);
y=[[y10 y11];[y20 y21]];
z1(1:length(xx1)) = 0;
z2(1:length(xx1)) = h;
z = [z1;z2];
x=x+x0; y=y+y0; z=z+z0;
 
surf(x,y,z,x,'EdgeColor','none')
%surf(x,y2,z,x,'EdgeColor','none')
set(gca,'PlotBoxAspectRatio',[1 1 1]);
%meshc(x,y,z);
Извиняюсь зане оптимальный код, это так правки по быстрому
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
04.12.2015, 13:07

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Как построить конус второго порядка?
написал общий вид конуса второго порядка и частный случай, а маткад ничего не может построить. А...

Усеченный конус
Из бревна, имеющего форму усеченного конуса, надо вырезать балку, поперечного сечения которой...

усеченный конус
Здравствуйте форумчане, в понедельник вступительный экзамен по математике. Готовлюсь по тестам ЦТ...

Усеченный конус OpenGL
как собственно его построить) обычный конус строю с помощью glut

Delphi векторная графика. усеченный конус на параллелепипеде.
нужно постороить параллепипед, а на нем усеченный конус и убрать невидимые линии.

Постройте усеченный конус по размерам и рассчитайте его объем
По заданным пользователем размерам постройте усеченный конус и рассчитайте его объем. Добавлено...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.