Week 4.1 - Genetic Algorithm

clear all close all clc   % Gas constant R = 8.314;    % Reading temperature values from file   f1 = fopen('THERMO.dat','r'); read = fgetl(f1); read = fgetl(f1);   % splitting the string into 4 element cell  tempstring = strsplit(read,' ');   % converting string into number low_temp =…

clear all  close all  clc   % Ranking cycle description  disp('                RANKINE CYCLE SIMULATOR     ') disp('1-2 is Isentroptic Expansion in the Turbine') disp('2-3 is Constant Pressure Heat Rejection by the Condenser') disp('3-4 is Isentropic…

clear all  close all clc   % Assiging values for x and y x = linspace(0,0.6,150); y = linspace(0,0.6,150); [xx yy] = meshgrid(x,y);   % Number of iterations iterations = 50;   % Surface plot   for i = 1:length(xx)     for j = 1:length(yy);         input_vector(1) =…

clear all  close all  clc   % Inputs b = 0.05;     % damping coefficient g = 9.81;     % gravitatinal acceleration in meters per sec^2 l = 1;        % Length of the pendulum in meters m = 1;        % Mass of the bob in kg   …