Code covered by the BSD License  

Highlights from
Helicopter Rotor to Fuselage Vibration Transmission Simulator

image thumbnail
from Helicopter Rotor to Fuselage Vibration Transmission Simulator by Divahar Jayaraman
Analysis tool for exploring which harmonic of blade vibration will be transmitted to hull and why

Make_Blade(x,y,rR,R,psi,theta,beta,zeta )
function [ Blade ] = Make_Blade(x,y,rR,R,psi,theta,beta,zeta )
%MAKE_BLADE Summary of this function goes here
%  Detailed explanation goes here

%######################################################### Creating the Blade #########################################################
[Blade(1) Blade(2) Blade(3)]=Extrude(x,y,rR,R,'y','closed');

set(Blade,'EdgeAlpha',0)
hold on

Blade(4)=Cylinder([0 0 0],1,rR,'y',20,'open' );
xlabel('x')
ylabel('y')
axis equal
% axis off

% ######################################################### Rotating the Blade #########################################################

rotate(Blade,[0 1 0],theta,[0 0 0])
rotate(Blade,[1 0 0],beta,[0 0 0])
rotate(Blade,[0 0 1],-90+psi-zeta,[0 0 0])

Contact us at files@mathworks.com