27 februari 2011
Dag 11
Något jag oroar mig för just nu är nog mekaniktentan! och KS:n på tisdag, hoppas det går bra...
Var var jag nu igen?
Dag 1 – En bild på mig + 10 fakta om mig.
Dag 2 – En person jag vill träffa just nu.
Dag 3 – Min favorit årstid och varför.
Dag 4 – Mina mål/drömmar/önskningar.
Dag 5 – Någonting jag vill ha mer än nåt annat just nu.
Dag 6 – Typ av killar jag faller för.
Dag 7 – Vad jag skulle göra om jag fick 1 miljon.
Dag 8 – En dålig vana jag önskar att jag inte hade.
Dag 9 – En bild på mitt favorit klädesplagg.
Dag 10 – En bild på mig idag och vad jag hade på mig.
Dag 11 – Någonting jag oroar mig för.
Dag 12 – En bild på ett ställe jag vart på.
Dag 13 – Mitt drömbröllop.
Dag 14 – En bild på mig själv för ett år sen.
Dag 15 – Någonting jag ångrar.
Dag 16 – Innehållet i min väska.
Dag 17 – En person jag vill byta liv med för en dag – och varför.
Dag 18 – Vad jag åt idag.
Dag 19 – En bild på det jag köpte senast.
Dag 20 – Min favorit film.
Dag 21 – En bild på mig själv som är tagen utav någon annan.
Dag 22 – Min reaktion när jag ser mig själv i spegeln.
Dag 23 – En låt som får mig att gråta.
Dag 24 – Mitt favoritprogram – och varför.
Dag 25 – Min favorithögtid.
Dag 2 – En person jag vill träffa just nu.
Dag 3 – Min favorit årstid och varför.
Dag 4 – Mina mål/drömmar/önskningar.
Dag 5 – Någonting jag vill ha mer än nåt annat just nu.
Dag 6 – Typ av killar jag faller för.
Dag 7 – Vad jag skulle göra om jag fick 1 miljon.
Dag 8 – En dålig vana jag önskar att jag inte hade.
Dag 9 – En bild på mitt favorit klädesplagg.
Dag 10 – En bild på mig idag och vad jag hade på mig.
Dag 11 – Någonting jag oroar mig för.
Dag 12 – En bild på ett ställe jag vart på.
Dag 13 – Mitt drömbröllop.
Dag 14 – En bild på mig själv för ett år sen.
Dag 15 – Någonting jag ångrar.
Dag 16 – Innehållet i min väska.
Dag 17 – En person jag vill byta liv med för en dag – och varför.
Dag 18 – Vad jag åt idag.
Dag 19 – En bild på det jag köpte senast.
Dag 20 – Min favorit film.
Dag 21 – En bild på mig själv som är tagen utav någon annan.
Dag 22 – Min reaktion när jag ser mig själv i spegeln.
Dag 23 – En låt som får mig att gråta.
Dag 24 – Mitt favoritprogram – och varför.
Dag 25 – Min favorithögtid.
26 februari 2011
24 februari 2011
Rökning
Jag förstår inte hur folk som röker inte kan ha dåligt samvete när de röker på allmän plats. Jag blir så arg när står och väntar på pendeltåget på väg hem från skolan, vart man än vänder sig så finns det någon som röker. Ibland så brukar jag flytta på mig, men vissa gånger så går det inte för alla röker! Jag ska inte behöva anpassa mig efter rökare; jag ska inte behöva flytta på mig eller hålla andan för att inte andas in röken. Rökare ska anpassa sig efter oss som inte röker! Jag menar inte att folk inte ska få röka. De som vill röka kan röka, men gör det hemma eller på en plats där inga andra påverkas. Jag vill att det ska införas en lag mot rökning på allmän plats. Jag är glad att jag inte har astma, för hade jag haft det hade jag inte överlevt här i Stockholm. Rökning är äckligt och dödligt! BLÄ!
Summary
Summary
KÄLLA: http://www.epa.gov/smokefree/pubs/etsfs.htmlThe U.S. Environmental Protection Agency (EPA) has published a major assessment of the respiratory health risks of passive smoking ( Respiratory Health Effects of Passive Smoking: Lung Cancer and Other Disorders EPA/600/6-90/006F). The report concludes that exposure to environmental tobacco smoke (ETS) -- commonly known as secondhand smoke -- is responsible for approximately 3,000 lung cancer deaths each year in nonsmoking adults and impairs the respiratory health of hundreds of thousands of children.
23 februari 2011
21 februari 2011
Te!
Finns det något godare än te? Skulle inte tro det!
Igår köpte jag mig en lite rosa vattenkokare på classes på 80kronor. Nu pryder den på mitt skrivbord och används för fullt. Nyss gjorde jag nyponroste och det blev rosa, häftigt om ni frågar mig! Jag sitter alltså här och kokar rosa nyponroste med min rosa tekokare som jag sedan ska dricka i min rosa tekopp. Jag erkänner; rosa är en fin färg:)
17 februari 2011
MATLAB
% Geometrianlys.m
% Koden löser de geometriska tvångsekvationerna för mekanismen med
% Newton-Raphsons metod genom att anropa funktionen NRsolver.m som måste
% finnas i samma mapp som huvudprogrammet.
% Anders Söderberg, KTH Maskinkonstruktion, 2011-02-04
%% Städar arbetsminnet och prompten
clc
clear all
close all
%% Sätter värden på givna parameterar och variabler (Skriv in era värden)
% Parametrar
L1 = 0.657; % Avstånd mellan infästningspunkter på styrarm [m]
L2 = 0.05; % Avstånd mellan infästningspunkter på tak [m]
L3 = 0.67; % Avstånd mellan infästningspunkter på bakruta [m]
L = 0.5; % Takets längd [m]
L4x = 0.035; % Avstånd i xled mellan infästningspunkter i kaross [m]
L4y = 0.044; % Avstånd i yled mellan infästningspunkter i kaross [m]
%% Beräknar vinklarna beta och gamma som funktion av alpha
beta = []; % Vinkel på bakrutan [rad]
gamma = []; % Vinkel på tak [rad]
% Löser tvångsekvationerna med avseende på beta och gamma för alla alpha
for i = 1:length(alpha)
if i == 1
gamma0 = pi/9;
beta0 = pi/180;
[beta(i),gamma(i)] = NRsolver(alpha(i),beta0,gamma0,L1,L2,L3,L4x,L4y);
else
[beta(i),gamma(i)] = NRsolver(alpha(i),beta(i-1),gamma(i-1),L1,L2,L3,L4x,L4y);
end
end
% Kontroll att lösningen uppfyller tvångsekvationer
eq1 = L1*cos(alpha)+L2*cos(gamma)-L3*cos(beta)-L4x;
eq2 = L1*sin(alpha)-L2*sin(gamma)-L3*sin(beta)+L4y;
% Plotta felet i tvångsekvationerna
figure(1)
grid on
hold on
plot(alpha*180/pi,eq1*1e6,'b')
plot(alpha*180/pi,eq2*1e6,'r')
title('Resulterande fel vid lösning av tvångsekvationer')
xlabel('\alpha [\circ]')
ylabel('Nummeriskt fel [\mum]')
legend('Loop i x-led','Loop i y-led')
%% Animering av rörelsen
% Koordinater till viktiga punkter
xO = zeros(size(alpha)); % Vektor med x-koordinater för origo
xA = L1*cos(alpha); % Vektor med x-koordinater för led A
yA = yO + L1*sin(alpha); % Vektor med y-koordinater för led A
xB = xA + L2*cos(gamma); % Vektor med x-koordinater för led B
yB = yA - L2*sin(gamma); % Vektor med y-koordinater för led B
xP = xB - (L+L2)*cos(gamma); % Vektor med x-koordinater för punkt P
yP = yB + (L+L2)*sin(gamma); % Vektor med y-koordinater för punkt P
% Plottar mekanimens position för samtliga vinklar
figure(2)
for i=1:length(alpha)
clf
hold on
plot([xO(i) xA(i)],[yO(i) yA(i)],'b') % Plottar styrarm (linje mellan O och A)
plot([xB(i) xC(i)],[yB(i) yC(i)],'g') % Plottar bakruta (linje mellan B och C)
plot([xB(i) xP(i)],[yB(i) yP(i)],'r') % Plottar tak (linje mellan B och P)
grid on % Aktiverar rutnät
axis equal % Sätt eregenskaper hos axlar
title('Mekanismens rörelse i xy-planet') % Sätter figur titel
xlabel('x [m]') % Sätter text på x-axel
ylabel('y [m]') % Sätter text på x-axel
xlim([-1.5 1.0]) % Sätter gränsvärden på x-axel
ylim([-1.0]) % Sätter gränsvärden på y-axel
pause(0.01) % Pausar programmet i 0.1 sekund
end
% Plottar alpha mot beta och gamma
figure(3)
hold on
plot(alpha*180/pi,beta*180/pi,'r') % Plottar alpha mot beta
plot(alpha*180/pi,gamma*180/pi,'b') % Plottar alpha mot gamma
grid on % Aktiverar rutnät
axis equal % Egenskaper hos axlar
title('Graf över \beta(\alpha) och \gamma(\alpha)') % Figurens titel
xlabel('Vinkel på \alpha i grader') % Text på x-axeln
ylabel('Vilkel på \beta och \gamma i grader') % text på y-axeln
xlim([0 180]) % Gränsvärden på x-axeln
ylim([0 180]) % Gränsvärden på y-axeln
legend('\beta','\gamma') % Visar vilken linje som tillhör vilken vinkel
% Bestämmer länkarmarnas vinkelhastigheter
alphaT = 15*pi/180; % Vinkelhastighet hos styrarm [rad/s]
betaT = (L1*(sin(gamma).*cos(alpha)+cos(gamma).*sin(alpha))*alphaT)./...
(L3*(cos(gamma).*sin(beta)+sin(gamma).*cos(beta))); % Räknar ut vinkelhastighet betaT för vinkeln beta
gammaT = (L1*alphaT*cos(alpha)-L3*betaT.*cos(beta))./(L2*cos(gamma)); % Räknar ut vinkelhastighet gammaT för vinkeln gamma
% Skriver ut vinkelhastigheter för betaT och gammaT för olika vinklar på alpha
disp(' ');
disp(['Alpha = num2str(betaT(41)) ' rad/s, GammaT = ' num2str(gammaT(41)) ' rad/s.']);
% Plottar vinkelhastigheter som funktion av alpha
figure(4)
hold on
plot(alpha,betaT,'r') % Plottar betaT som en funktion av alpha
plot(alpha,gammaT,'b') % Plottar gammaT som en funktion av alpha
grid on % Aktivera rutnät
title('Graf över vinkelhastigheterna betaT och gammaT som funktion av \alpha') % Figurens titel
xlabel('\alpha [rad]') % Text på x-axeln
ylabel('betaT och gammaT [rad/s]') % text på y-axeln
legend('betaT','gammaT') % Visar vilken linje som tillhör vilken vinkelhastighet
% Bestämmer länkarmarnas vinkelaccelerationer
% Räknar ut vinkelaccelerationen betaTT för vinkeln beta
betaTT = (cos(gamma).*(alphaT.^2.*cos(alpha)+L2*cos(gamma).*gammaT.^2-...
L3*betaT.^2.*cos(beta))+sin(gamma).*(L2*sin(gamma).*gammaT.^2-...
L1*alphaT.^2.*sin(alpha)+L3.*betaT.^2.*sin(beta)))./...
(L3*(cos(gamma).*sin(beta)+sin(gamma).*cos(beta)));
% Räknar ut vinkelaccelerationen gammaTT för vinkeln gamma
gammaTT = (-L1*alphaT.^2.*sin(alpha)+L3*betaT.^2.*sin(beta)-...
L3*betaTT.*cos(beta)+L2*gammaT.^2.*sin(gamma))./(L2*cos(gamma));
% Skriver ut vinkelaccelerationer för betaTT och gammaTT för olika vinklar på alpha
disp(' ');
disp(['Alpha = ' num2str(alpha(41)*180/pi) ' grader, BetaTT = ' num2str(betaTT(41)) ' rad/s^2, GammaTT = ' num2str(gammaTT(41)) ' rad/s^2.']);
figure(5)
hold on
plot(alpha,betaTT,'r') % Plottar betaTT som en funktion av alpha
plot(alpha,gammaTT,'b') % Plottar gammaTT som en funktion av alpha
grid on % Aktivera rutnät
title('Graf över vinkelaccelerationerna betaTT och gammaTT som funktion av \alpha') % Figurens titels
xlabel('\alpha [rad]') % Text på x-axeln
ylabel('betaTT och gammaTT [rad/s^2]') % text på y-axeln
legend('betaTT','gammaTT') % Visar vilken linje som tillhör vilken vinkelacc
%% Simulering av av punkten T:s rörelse
xT = L1*cos(alpha)-L*cos(gamma)+(t2/2)*sin(gamma); % Vektor med x-koordinater för punkten T
yT = L1*sin(alpha)+L*sin(gamma)+(t2/2)*cos(gamma); % Vektor med y-koordinater för punkten T
% Plottar punkten T:s rörelse i xy-planet
figure(6)
hold on
plot(x,yT,'b') % Plottar punkten T:s rörelse
grid on % Aktiverar rutnät
axis equal % Egenskaper hos axlar
title('Punktens T:s rörelse i xy-planet') % Sätt figur titel
xlabel('x [m]') % Text på y-axel
ylabel('y [m]') % Text på x-axel
xlim([-1.5 1.0]) % Gränsvärden på x-axel
ylim([-0.5 1.0]) % Gränsvärden på y-axel
% Loop som bestämmer position i vektorn för maxvärde på yT
yTmax = max(yT);
for n=1:length(yT)
if yTmax == yT(n)
yTmaxpos = n;
break;
end
end
yTmaxalpha = alpha(yTmaxpos); % Bestämmer för vilken vinkel på alpha yTmax inträffar
% Skriver ut värden på yT för olika vinklar alpha
disp(' ');
disp(['Alpha = ' num2str(alpha(41)*180/pi) ' grader, yT = ' num2str(yT(41)) ' m, xT = ' num2str(xT(41)) ' m.']);
% Skriver ut för vilken vinkel yT har son maxposition
disp(' ');
disp(['Punkten T har sin högsta punkt y = ' num2str(yTmax) ' m vid vinkeln alpha = ' num2str(yTmaxalpha*180/pi) ' grader.']);
% Plottar yT som funktion av alpha och maxvärdet för yT
figure(7)
hold on
plot(alpha/pi,yT,'b') % Plottar punkten T:s y-koordinat som funktion av alpha
plot(yTmaxalpha*180/pi,yTmax,'r*') % Plottar positionen för yTmax
xTp = gammaT.*((t2/2)*cos(gamma)+L*sin(gamma))-L1*alphaT.*sin(alpha); % Hastighet i x-led för punkten T
yTp = gammaT.*(L*cos(gamma)-(t2/2)*sin(gamma))+L1*alphaT.*cos(alpha); % Hastighet i y-led för punkten T
% Acceleration i x-led för punkten T
xTpp = (t2/2)*gammaTT.*cos(gamma)-(t2/2)*gammaT.^2.*sin(gamma)+...
L*gammaTT.*sin(gamma)+L*gammaT.^2.*cos(gamma)-L1*alphaT^2*cos(alpha);
% Acceleration i y-led för punkten T
yTpp = L1*alphaT.^2.*(-sin(alpha))+L*gammaTT.*cos(gamma)+L*gammaT.^2.*(-sin(gamma))+...
(t2/2)*gammaTT.*(-sin(gamma))+(t2/2)*gammaT.^2.*(-cos(gamma));
rTp = sqrt((xTp).^2 + (yTp).^2); % Resultanthastighet för punkten T
rTpp = sqrt((xTpp).^2 + (yTpp).^2); % Resultantacceleration för punkten T
disp(' ');
disp(['Alpha = ' num2str(alpha(41)*180/pi) ' grader, rTp =num2str(rTpp(41)) ' m/s^2.']);
% Plottar T:s hastigheter och accelerationer som funktion av alpha
figure(8)
subplot(3,2,1)
plot(alpha,xTp,'b') % Plottar T:s hastighet i x-led som funktion av alph
title('Punktens T:s hastighet i x-led som funktion av \alpha') % Figurens titel
ylabel('Hastighet [m/s]') % Text på y-axel
xlabel('\alpha [rad]') % Text på x-axel
%% SLUT
Såhär kan en dag på KTH se ut...
% Koden löser de geometriska tvångsekvationerna för mekanismen med
% Newton-Raphsons metod genom att anropa funktionen NRsolver.m som måste
% finnas i samma mapp som huvudprogrammet.
% Anders Söderberg, KTH Maskinkonstruktion, 2011-02-04
%% Städar arbetsminnet och prompten
clc
clear all
close all
%% Sätter värden på givna parameterar och variabler (Skriv in era värden)
% Parametrar
L1 = 0.657; % Avstånd mellan infästningspunkter på styrarm [m]
L2 = 0.05; % Avstånd mellan infästningspunkter på tak [m]
L3 = 0.67; % Avstånd mellan infästningspunkter på bakruta [m]
L = 0.5; % Takets längd [m]
L4x = 0.035; % Avstånd i xled mellan infästningspunkter i kaross [m]
L4y = 0.044; % Avstånd i yled mellan infästningspunkter i kaross [m]
%% Beräknar vinklarna beta och gamma som funktion av alpha
beta = []; % Vinkel på bakrutan [rad]
gamma = []; % Vinkel på tak [rad]
% Löser tvångsekvationerna med avseende på beta och gamma för alla alpha
for i = 1:length(alpha)
if i == 1
gamma0 = pi/9;
beta0 = pi/180;
[beta(i),gamma(i)] = NRsolver(alpha(i),beta0,gamma0,L1,L2,L3,L4x,L4y);
else
[beta(i),gamma(i)] = NRsolver(alpha(i),beta(i-1),gamma(i-1),L1,L2,L3,L4x,L4y);
end
end
% Kontroll att lösningen uppfyller tvångsekvationer
eq1 = L1*cos(alpha)+L2*cos(gamma)-L3*cos(beta)-L4x;
eq2 = L1*sin(alpha)-L2*sin(gamma)-L3*sin(beta)+L4y;
% Plotta felet i tvångsekvationerna
figure(1)
grid on
hold on
plot(alpha*180/pi,eq1*1e6,'b')
plot(alpha*180/pi,eq2*1e6,'r')
title('Resulterande fel vid lösning av tvångsekvationer')
xlabel('\alpha [\circ]')
ylabel('Nummeriskt fel [\mum]')
legend('Loop i x-led','Loop i y-led')
%% Animering av rörelsen
% Koordinater till viktiga punkter
xO = zeros(size(alpha)); % Vektor med x-koordinater för origo
xA = L1*cos(alpha); % Vektor med x-koordinater för led A
yA = yO + L1*sin(alpha); % Vektor med y-koordinater för led A
xB = xA + L2*cos(gamma); % Vektor med x-koordinater för led B
yB = yA - L2*sin(gamma); % Vektor med y-koordinater för led B
xP = xB - (L+L2)*cos(gamma); % Vektor med x-koordinater för punkt P
yP = yB + (L+L2)*sin(gamma); % Vektor med y-koordinater för punkt P
% Plottar mekanimens position för samtliga vinklar
figure(2)
for i=1:length(alpha)
clf
hold on
plot([xO(i) xA(i)],[yO(i) yA(i)],'b') % Plottar styrarm (linje mellan O och A)
plot([xB(i) xC(i)],[yB(i) yC(i)],'g') % Plottar bakruta (linje mellan B och C)
plot([xB(i) xP(i)],[yB(i) yP(i)],'r') % Plottar tak (linje mellan B och P)
grid on % Aktiverar rutnät
axis equal % Sätt eregenskaper hos axlar
title('Mekanismens rörelse i xy-planet') % Sätter figur titel
xlabel('x [m]') % Sätter text på x-axel
ylabel('y [m]') % Sätter text på x-axel
xlim([-1.5 1.0]) % Sätter gränsvärden på x-axel
ylim([-1.0]) % Sätter gränsvärden på y-axel
pause(0.01) % Pausar programmet i 0.1 sekund
end
% Plottar alpha mot beta och gamma
figure(3)
hold on
plot(alpha*180/pi,beta*180/pi,'r') % Plottar alpha mot beta
plot(alpha*180/pi,gamma*180/pi,'b') % Plottar alpha mot gamma
grid on % Aktiverar rutnät
axis equal % Egenskaper hos axlar
title('Graf över \beta(\alpha) och \gamma(\alpha)') % Figurens titel
xlabel('Vinkel på \alpha i grader') % Text på x-axeln
ylabel('Vilkel på \beta och \gamma i grader') % text på y-axeln
xlim([0 180]) % Gränsvärden på x-axeln
ylim([0 180]) % Gränsvärden på y-axeln
legend('\beta','\gamma') % Visar vilken linje som tillhör vilken vinkel
% Bestämmer länkarmarnas vinkelhastigheter
alphaT = 15*pi/180; % Vinkelhastighet hos styrarm [rad/s]
betaT = (L1*(sin(gamma).*cos(alpha)+cos(gamma).*sin(alpha))*alphaT)./...
(L3*(cos(gamma).*sin(beta)+sin(gamma).*cos(beta))); % Räknar ut vinkelhastighet betaT för vinkeln beta
gammaT = (L1*alphaT*cos(alpha)-L3*betaT.*cos(beta))./(L2*cos(gamma)); % Räknar ut vinkelhastighet gammaT för vinkeln gamma
% Skriver ut vinkelhastigheter för betaT och gammaT för olika vinklar på alpha
disp(' ');
disp(['Alpha = num2str(betaT(41)) ' rad/s, GammaT = ' num2str(gammaT(41)) ' rad/s.']);
% Plottar vinkelhastigheter som funktion av alpha
figure(4)
hold on
plot(alpha,betaT,'r') % Plottar betaT som en funktion av alpha
plot(alpha,gammaT,'b') % Plottar gammaT som en funktion av alpha
grid on % Aktivera rutnät
title('Graf över vinkelhastigheterna betaT och gammaT som funktion av \alpha') % Figurens titel
xlabel('\alpha [rad]') % Text på x-axeln
ylabel('betaT och gammaT [rad/s]') % text på y-axeln
legend('betaT','gammaT') % Visar vilken linje som tillhör vilken vinkelhastighet
% Bestämmer länkarmarnas vinkelaccelerationer
% Räknar ut vinkelaccelerationen betaTT för vinkeln beta
betaTT = (cos(gamma).*(alphaT.^2.*cos(alpha)+L2*cos(gamma).*gammaT.^2-...
L3*betaT.^2.*cos(beta))+sin(gamma).*(L2*sin(gamma).*gammaT.^2-...
L1*alphaT.^2.*sin(alpha)+L3.*betaT.^2.*sin(beta)))./...
(L3*(cos(gamma).*sin(beta)+sin(gamma).*cos(beta)));
% Räknar ut vinkelaccelerationen gammaTT för vinkeln gamma
gammaTT = (-L1*alphaT.^2.*sin(alpha)+L3*betaT.^2.*sin(beta)-...
L3*betaTT.*cos(beta)+L2*gammaT.^2.*sin(gamma))./(L2*cos(gamma));
% Skriver ut vinkelaccelerationer för betaTT och gammaTT för olika vinklar på alpha
disp(' ');
disp(['Alpha = ' num2str(alpha(41)*180/pi) ' grader, BetaTT = ' num2str(betaTT(41)) ' rad/s^2, GammaTT = ' num2str(gammaTT(41)) ' rad/s^2.']);
figure(5)
hold on
plot(alpha,betaTT,'r') % Plottar betaTT som en funktion av alpha
plot(alpha,gammaTT,'b') % Plottar gammaTT som en funktion av alpha
grid on % Aktivera rutnät
title('Graf över vinkelaccelerationerna betaTT och gammaTT som funktion av \alpha') % Figurens titels
xlabel('\alpha [rad]') % Text på x-axeln
ylabel('betaTT och gammaTT [rad/s^2]') % text på y-axeln
legend('betaTT','gammaTT') % Visar vilken linje som tillhör vilken vinkelacc
%% Simulering av av punkten T:s rörelse
xT = L1*cos(alpha)-L*cos(gamma)+(t2/2)*sin(gamma); % Vektor med x-koordinater för punkten T
yT = L1*sin(alpha)+L*sin(gamma)+(t2/2)*cos(gamma); % Vektor med y-koordinater för punkten T
% Plottar punkten T:s rörelse i xy-planet
figure(6)
hold on
plot(x,yT,'b') % Plottar punkten T:s rörelse
grid on % Aktiverar rutnät
axis equal % Egenskaper hos axlar
title('Punktens T:s rörelse i xy-planet') % Sätt figur titel
xlabel('x [m]') % Text på y-axel
ylabel('y [m]') % Text på x-axel
xlim([-1.5 1.0]) % Gränsvärden på x-axel
ylim([-0.5 1.0]) % Gränsvärden på y-axel
% Loop som bestämmer position i vektorn för maxvärde på yT
yTmax = max(yT);
for n=1:length(yT)
if yTmax == yT(n)
yTmaxpos = n;
break;
end
end
yTmaxalpha = alpha(yTmaxpos); % Bestämmer för vilken vinkel på alpha yTmax inträffar
% Skriver ut värden på yT för olika vinklar alpha
disp(' ');
disp(['Alpha = ' num2str(alpha(41)*180/pi) ' grader, yT = ' num2str(yT(41)) ' m, xT = ' num2str(xT(41)) ' m.']);
% Skriver ut för vilken vinkel yT har son maxposition
disp(' ');
disp(['Punkten T har sin högsta punkt y = ' num2str(yTmax) ' m vid vinkeln alpha = ' num2str(yTmaxalpha*180/pi) ' grader.']);
% Plottar yT som funktion av alpha och maxvärdet för yT
figure(7)
hold on
plot(alpha/pi,yT,'b') % Plottar punkten T:s y-koordinat som funktion av alpha
plot(yTmaxalpha*180/pi,yTmax,'r*') % Plottar positionen för yTmax
xTp = gammaT.*((t2/2)*cos(gamma)+L*sin(gamma))-L1*alphaT.*sin(alpha); % Hastighet i x-led för punkten T
yTp = gammaT.*(L*cos(gamma)-(t2/2)*sin(gamma))+L1*alphaT.*cos(alpha); % Hastighet i y-led för punkten T
% Acceleration i x-led för punkten T
xTpp = (t2/2)*gammaTT.*cos(gamma)-(t2/2)*gammaT.^2.*sin(gamma)+...
L*gammaTT.*sin(gamma)+L*gammaT.^2.*cos(gamma)-L1*alphaT^2*cos(alpha);
% Acceleration i y-led för punkten T
yTpp = L1*alphaT.^2.*(-sin(alpha))+L*gammaTT.*cos(gamma)+L*gammaT.^2.*(-sin(gamma))+...
(t2/2)*gammaTT.*(-sin(gamma))+(t2/2)*gammaT.^2.*(-cos(gamma));
rTp = sqrt((xTp).^2 + (yTp).^2); % Resultanthastighet för punkten T
rTpp = sqrt((xTpp).^2 + (yTpp).^2); % Resultantacceleration för punkten T
disp(' ');
disp(['Alpha = ' num2str(alpha(41)*180/pi) ' grader, rTp =num2str(rTpp(41)) ' m/s^2.']);
% Plottar T:s hastigheter och accelerationer som funktion av alpha
figure(8)
subplot(3,2,1)
plot(alpha,xTp,'b') % Plottar T:s hastighet i x-led som funktion av alph
title('Punktens T:s hastighet i x-led som funktion av \alpha') % Figurens titel
ylabel('Hastighet [m/s]') % Text på y-axel
xlabel('\alpha [rad]') % Text på x-axel
%% SLUT
Såhär kan en dag på KTH se ut...
16 februari 2011
Mek
Igår fick vi tillbaka inlämningsuppgifterna i mekaniken. Jag och Elaff hade alla rätt, success! Så nu när jag kollade min KTHmail fick jag veta att jag kan tillgodoräkna mig ännu 1,5högskolepoäng! Today is going to be a good day:)
15 februari 2011
13 februari 2011
Théparty
Idag har det varit en pluggfri dag (nästan, satt ju inatt och pluggade mekanik i 2timmar). Har hunnit med väldigt mycket. For till ICA maxi och handlade mat.
Jag köpte två sorters lösthé; irish cream och summer passion. Just nu sitter jag och dricker summer passion och gud vad god den är! Tror jag har hittat mitt nya favorit thé! Men hur som helst, när vi var färdig med att handla mat så for vi till stan en sväng, för jag kom på att jag behövde en såndär teskedskula som man har till lösthé. Hittade en hjärtformad på lagerhaus, fick bara lov att köpa den :) Sen hittade jag också två söta kaniner som ville följa med mig hem. Vem kan säga nej till en kanin liksom... dessutom va de på rea!
När vi kom hem till lägenheten så började jag och Johan storstäda köket och toaletten. Jag såg en silverfisk inatt när jag var på toaletten... Inte kul! Jag rensade avloppet för första gången i mitt liv. Det var en upplevelse...
Pappa tipsade om att vi skulle köpa en golvskrapa, så vi köpte en när vi va på ICA maxi.
Johan köpte en ny tvålpump på lagerhaus. Den gamla va äcklig och började falla sönder.
Nu ska jag gå och sova. Börjar klockan åtta imorgon och efter skolan ska vi på gymmet!
God natt världen! Time for bed.
Såhär ser det ut ute, snösnösnö...
Hårboll
Ovanför mitt skrivbord
Nattplugg
Klockan är snart halv tre på natten och jag kan inte sova. Så nu sitter jag och lyssnar på The Pogues, med tända ljus, en kopp citron-te och mina mekanikböcker.
Helgen har varit super, än så länge. I fredags hade vi inga föreläsningar så min projektgrupp i Modellering och simulerings kursen for hem till en i gruppen och pluggade. Vi fick faktiskt väldigt mycket gjort, blev nästan färdigt med inlämningen som ska in på fredag. Efter det gick vi ut och åt och sen såg vi på film och åt glass.
Igår (lördag) fortsatte vi att plugga och sen drack vi te. Riktigt mysigt :)
Ett smakprov på vad vi gjort i helgen:
11 februari 2011
SL
Ser ut som jag måste ta tunnelbanan till skolan.
Alla bussar är inställda och pendeltågen kan vara upp till 60minuter försenade. Stockholm och snö fungerar inte så bra ihop... Hade det snöat såhär i Övik hade allt flytit på som vanligt...
Dumma Stockholm.
Dumma Sl.
Alla bussar är inställda och pendeltågen kan vara upp till 60minuter försenade. Stockholm och snö fungerar inte så bra ihop... Hade det snöat såhär i Övik hade allt flytit på som vanligt...
Dumma Stockholm.
Dumma Sl.
Dag 8
Min dåligaste vana måste nog vara att jag har en tendens att skjuta upp saker. Jag erkänner; jag, Lina Persson, är en tidsoptimist.
Kick off
Idag och ikväll har vi bestämt att det är kick off med projektgruppen, plugg och film står på schemat. Det kommer bli awesome.
Dag 7
Vad skulle jag göra om jag fick en miljon kronor?
Oj, svår fråga... Jag skulle nog använda en del av pengarna till att leva och gå i skolan, så jag slipper ta lån. Det är ungefär 300 000kr. Sen skulle jag nog spara 500 000kr på banken, så jag bland annat kan fara och resa efter jag är färdig med min utbildning. Resten skulle jag nog ge till mamma och pappa.
8 februari 2011
Inspiration
Man får bara en resa genom livet,
så glöm inte att stanna upp
och lukta på blommorna
Det är först då fågeln kastar
sig ut i den fria rymden som
hon känner att hon har vingar.
Bliderna är tagna från google...
7 februari 2011
6 februari 2011
Karin Boye
De gångna dagarna
När en gammal man ligger sjuk, kommer alla hans gångna dagar
och sätter sig blida i ring omkring hans säng.
De jämrar sig inte, de gråter inte och snyftar.
De nickar sakta och tänker på gamla ting.
Och var och en berättar sin aldrig glömda saga,
och var och en har med sig ett ljus och tänder stilla.
De speglar sig klart i de mörka flodernas vatten.
Han vandrar, vandrar under valv, under bågar av darrande ljus.
Dag 6
Jag vet faktiskt inte. Just nu så vill jag inte tänka på sånt. Jag vill leva livet först; fara ut och resa, se världen och skaffa erfarenheter. Men innan det ska jag gå färdigt skolan, så jag kan bocka av det från min lista!
Men den bästa egenskapen som en kille (eller vilken människa som helst för den delen) kan ha är väl att ha en bra självkänsla och inte känna att man måste bevisa något för andra. Att vara allmänt trevlig och ha ett sunt förnuft är också väldigt viktigt.
Men den bästa egenskapen som en kille (eller vilken människa som helst för den delen) kan ha är väl att ha en bra självkänsla och inte känna att man måste bevisa något för andra. Att vara allmänt trevlig och ha ett sunt förnuft är också väldigt viktigt.
5 februari 2011
29.4
Okej, jag erkänner jag kanske har några onödiga kilon som jag skulle må bra av att bli av med. Ibland kan jag till och med känna att jag är stor som ett hus, medan jag vissa gånger känner jag mig lika smal som en supermodell. Många gånger känner jag mig bara förvirrad och kan inte ens identifiera min egen storlek. Jag önska att jag bara en gång kunde gå ut ur min egen kropp och se mig själv från ett annat perspektiv.
Jag googlade på BMI för att av ren nyfikenhet ta reda på vilket BMI just jag har. Jag tänkte att det svaret jag får kanske kan visa mig på ett ungefär hur jag ser ut.
Jag googlade på BMI för att av ren nyfikenhet ta reda på vilket BMI just jag har. Jag tänkte att det svaret jag får kanske kan visa mig på ett ungefär hur jag ser ut.
Jag vet att den siffra man får ut genom att använda formeln;
inte precis är det BMI man verkligen ha, eftersom man då måste ta hänsyn till vissa saker som man inte kan genom att bara använda sig av en matematisk formel. Men jag tänkte att jag tar det med en nypa salt. När jag fått min siffra ser jag att jag bara är 0.6 ifrån att ha ett BMI över 30 som innebär att man lider av fetma.
BMI-värde:
Undervikt < 18,5
Normalvikt 18,5 - 24,9
Övervikt 25,0 - 29,9
Fetma klass I 30,0 - 34,9
Svår fetma/Fetma klass II 35,0 - 39,9
Mycket svår fetma/Fetma klass III; 40,0
Jag fick alltså veta att jag hade ett BMI på 29.4. Vid det här laget hade jag glömt allt jag sagt innan om att ta det med en nypa salt och att det bara var en matematisk formel. Jag visste inte om jag skulle skratta eller gråta. Skratta, för att jag nästan lider av fetma. JAG? Lina Persson? Fetma? Jag kan acceptera att jag är lite överviktig, men fetma? Gråta, för att även om jag skulle ta detta med en nypa salt så måste det fortfarande ligga en liten sanning bakom 29.4, annars skulle inte det här sättet att räkna ut sitt BMI finnas!
Jag tänker inte ta det här på för stort allvar, fast det betyder inte att jag tänker ignorera det totalt. Jag vet att jag inte lider av fetma, men jag är fortfarande överviktig. I've got too much junk in my trunk! Många säger att det inte spelar någon roll om man är tjock eller smal, det viktigaste är att man tycker om och är nöjd med sig själv. En av de viktigaste sakerna i livet för mig är min fysiska hälsa och den vill jag förbättra.
Jag säger inte att jag tänker sluta äta godis, för man måste få unna sig av saker man tycker om. För att min psykiska hälsa också ska må bra måste jag få mumsa på lite godis eller baka en kladdkaka lite då och då. Det jag tänker börja med, är att tänka innan jag gör något och framför allt börja tänka sundare.
"Okej, jag kan äta lite godis idag och ta en promenad till skolan imorgon. Eller så kan jag kanske till och med byta ut godiset mot en frukt."
"Behöver jag verkligen dricka Cola till maten, jag kan lika gärna ta ett glas vatten."
"Jag kanske ska ta en springtur nu istället för att sitta vid datorn och slösurfa."
Det finns inga nackdelar med att leva ett sunt liv och det ska jag bevisa!
Jag säger inte att jag tänker sluta äta godis, för man måste få unna sig av saker man tycker om. För att min psykiska hälsa också ska må bra måste jag få mumsa på lite godis eller baka en kladdkaka lite då och då. Det jag tänker börja med, är att tänka innan jag gör något och framför allt börja tänka sundare.
"Okej, jag kan äta lite godis idag och ta en promenad till skolan imorgon. Eller så kan jag kanske till och med byta ut godiset mot en frukt."
"Behöver jag verkligen dricka Cola till maten, jag kan lika gärna ta ett glas vatten."
"Jag kanske ska ta en springtur nu istället för att sitta vid datorn och slösurfa."
Det finns inga nackdelar med att leva ett sunt liv och det ska jag bevisa!
Blod
Jag och Johan for till blodcentralen idag för att ge blod, men jag fick inte ge för jag har ätit penicillin. Jag tror jag inte är gjord för att vara blodgivare. Det var tredje gången jag var där för att ge blod men blivit nekad till det.
Idag
Idag måste jag städa rummet. För tillfället ser mitt rum ut som en svinstia och jag är ingen gris (eller?). Ohh nu blev jag sugen på att se Babe! Nej, nej, nej, nu måste jag verkligen städa rummet!
4 februari 2011
3 februari 2011
Earth hour; toilet edition
Glödlampan på toaletten är sönder, så istället för att tända en lampa tänder vi nu ljus...
Mysigt, men läskigt.
Vi får se hur det går att dusch imorgon bitti.
Mysigt, men läskigt.
Vi får se hur det går att dusch imorgon bitti.
Projektmöten med fika
Sitter med CAD. Håller på med ett projekt som vi jobbar med i modellering och simulerings kursen. Vi ska ta fram ett väggfäste för en platt-TV, men först ska vi göra en modell i CAD av ett väggfäste för tjocka TV-apparater. Min grupp är nästan klar, vi ska bara sätta ihop alla delar. Inlämningen är nästa fredag så det är inte så bråttom, men det är alltid skönt att bli färdig tidigare. Vi hade även projektmöte idag, då beslutade vi oss för att någon alltid skulle baka fika till projektmötena. Bra beslut, enligt mig. Längtar redan till nästa möte, men det är inte förrens på onsdag... Jag vill ha fika nu!
2 februari 2011
Black Swan
Såg den för någon veckan sedan. Hur bra som helst, fast den är lite speciell. Den har dessutom blivit nominerad till fyra Oscars, plus att Natalie Portman blivit nominerad till bästa kvinnliga huvudroll. Hoppas hon vinner, hon förtjänar det!

Actress in a Leading Role
- Annette Bening in “The Kids Are All Right”
- Nicole Kidman in “Rabbit Hole”
- Jennifer Lawrence in “Winter's Bone”
- Natalie Portman in “Black Swan”
- Michelle Williams in “Blue Valentine”
- Cinematography
- “Black Swan” Matthew Libatique
- “Inception” Wally Pfister
- “The King's Speech” Danny Cohen
- “The Social Network” Jeff Cronenweth
- “True Grit” Roger Deakins
- Directing
- “Black Swan” Darren Aronofsky
- “The Fighter” David O. Russell
- “The King's Speech” Tom Hooper
- “The Social Network” David Fincher
- “True Grit” Joel Coen and Ethan Coen
- Film Editing
- “Black Swan” Andrew Weisblum
- “The Fighter” Pamela Martin
- “The King's Speech” Tariq Anwar
- “127 Hours” Jon Harris
- “The Social Network” Angus Wall and Kirk Baxter
- Best Picture
- “Black Swan” Mike Medavoy, Brian Oliver and Scott Franklin, Producers
- “The Fighter” David Hoberman, Todd Lieberman and Mark Wahlberg, Producers
- “Inception” Emma Thomas and Christopher Nolan, Producers
- “The Kids Are All Right” Gary Gilbert, Jeffrey Levy-Hinte and Celine Rattray, Producers
- “The King's Speech” Iain Canning, Emile Sherman and Gareth Unwin, Producers
- “127 Hours” Christian Colson, Danny Boyle and John Smithson, Producers
- “The Social Network” Scott Rudin, Dana Brunetti, Michael De Luca and Ceán Chaffin, Producers
- “Toy Story 3” Darla K. Anderson, Producer
- “True Grit” Scott Rudin, Ethan Coen and Joel Coen, Producers
- “Winter's Bone" Anne Rosellini and Alix Madigan-Yorkin, Producers
Prenumerera på:
Inlägg (Atom)