Hola Carlos.
El programa esta hecho genericamente. Es decir funciona:
1). Para cualquier angulo entre recta y recta (dos consecutivos) . El angulo entre dos rectas consecutivos es constante.
2). El centro de la circunferencia (h,k) es cualquier punto del plano R2
3). El numero de rectas es arbitrario.
%========================================
% tengo una circunferencia; conozco el centro
% graficar cualquier lugar del cuadrante positivo (arriba derecha)
% y tengo que hacer unas rectas que graduen la circunferencia
% desde 0º hasta xº
% es decir, trazar rectas desde el centro de la circunferencia hasta el borde
% LEYENDA:
% centro : (h,k)
% radio : r
% Numero de rectas a graficar: Num_Rectas
% Angulo entre recta y recta: angulo
clear
t=0:pi/40:2*pi;
h=3; k=5; r=100;
Num_Rectas=40;
angulo=2;
x=r*cos(t)+h;
y=r*sin(t)+k;
figure(gcf)
plot(x,y,'r')
axis('image')
grid
hold on
text(h,k,'O')
for i=0:angulo:angulo*Num_Rectas-1
plot([h h+r*cosd(i)],[k k+r*sind(i)])
pause(0.1)
end
hold off
%===============================
Saludos.
JOSE JEREMIAS CABALLERO
ASESOR DE PROYECTOS CON MATLAB
PROFESOR DE METODOS NUMERICOS CON MATLAB
PROGRAMADOR EN MATLAB
[email protected]