WICHTIG: Der Betrieb von goMatlab.de wird privat finanziert fortgesetzt. - Mehr Infos...

Mein MATLAB Forum - goMatlab.de

Mein MATLAB Forum

 
Gast > Registrieren       Autologin?   

Partner:




Forum
      Option
[Erweitert]
  • Diese Seite per Mail weiterempfehlen
     


Gehe zu:  
Neues Thema eröffnen Neue Antwort erstellen

eigene Matlab Funktion schreiben

 

Sebastian Kiebert
Forum-Anfänger

Forum-Anfänger


Beiträge: 20
Anmeldedatum: 20.11.10
Wohnort: ---
Version: ---
     Beitrag Verfasst am: 20.11.2010, 15:33     Titel: eigene Matlab Funktion schreiben
  Antworten mit Zitat      
Hallo, ich befasse mich jetzt schon etwas länger mit Matlab dank der Uni. Aber jetzt möchte ich die Formeln aus einigen Vorlesungen in Matlab einpflegen und diese als Funktion benutzen.
Hier ein Beispiel aus der Festigkeitslehre

Code:

function drehenKS(SigmaX, SigmaY, TauXY, alpha)

    alpha = alpha *pi/180;
    SigmaPsi = (SigmaX+SigmaY)/2 + (SigmaX-SigmaY)/2 *cos(2*alpha) + TauXY*sin(2*alpha)
    SigmaEta = (SigmaX+SigmaY)/2 - (SigmaX-SigmaY)/2 *cos(2*alpha) - TauXY*sin(2*alpha)
    TauPsiEta = -(SigmaX - SigmaY)/2 *sin(2*alpha) - TauXY*cos(2*alpha)

SigmaMax = (SigmaX+SigmaY)/2 + sqrt((SigmaX-SigmaY)^2 /4 + TauXY^2)
SigmaMin = (SigmaX+SigmaY)/2 - sqrt((SigmaX-SigmaY)^2 /4 + TauXY^2)
TauMax = (SigmaMax-SigmaMin)/2

Drehwinkel = atan(2*TauXY/(SigmaX-SigmaY))*90/pi

end


Das funktioniert ja auch ganz gut, aber jetzt wollte ich, dass ich nicht unbedingt ein "alpha" übergeben muss und das Programm somit nur den unteren Teil ohne "alpha" rechnet. Weiterhin wär es ganz angenehm wenn die ausgegebenen Ergebnisse im WorkSpace stehen.
Wäre sehr nett wenn mir einer weiterhelfen könnte.
Private Nachricht senden Benutzer-Profile anzeigen


Achi
Forum-Guru

Forum-Guru


Beiträge: 250
Anmeldedatum: 14.04.10
Wohnort: ---
Version: R2007a
     Beitrag Verfasst am: 20.11.2010, 16:21     Titel:
  Antworten mit Zitat      
1. function [alpha]=drehenKS(SigmaX, SigmaY, TauXY, alpha)
Jetzt hast du einen Rückgabepramater
2. help varargin
Private Nachricht senden Benutzer-Profile anzeigen E-Mail senden
 
Sebastian Kiebert
Themenstarter

Forum-Anfänger

Forum-Anfänger


Beiträge: 20
Anmeldedatum: 20.11.10
Wohnort: ---
Version: ---
     Beitrag Verfasst am: 20.11.2010, 16:59     Titel:
  Antworten mit Zitat      
Code:

function[SigmaMax,SigmaMin,TauMax,Drehwinkel]=drehenKS(SigmaX, SigmaY, TauXY, varargin)
    %%Der optionale Werte ist das Alpha für das gedrehte
    %Koordinatensystem für Psi und Eta.
    %Sonst werden nur die maximalen Spannungen, der Schub und der
    %Verdrehwinkelausgerechnet
    %
   
    if size(varargin,1) == 1
        alpha = varargin{1};
   
          alpha = alpha *pi/180;
          SigmaPsi = (SigmaX+SigmaY)/2 + (SigmaX-SigmaY)/2 *cos(2*alpha) + TauXY*sin(2*alpha)
          SigmaEta = (SigmaX+SigmaY)/2 - (SigmaX-SigmaY)/2 *cos(2*alpha) - TauXY*sin(2*alpha)
          TauPsiEta = -(SigmaX - SigmaY)/2 *sin(2*alpha) - TauXY*cos(2*alpha)
         
    end

SigmaMax = (SigmaX+SigmaY)/2 + sqrt((SigmaX-SigmaY)^2 /4 + TauXY^2)
SigmaMin = (SigmaX+SigmaY)/2 - sqrt((SigmaX-SigmaY)^2 /4 + TauXY^2)
TauMax = (SigmaMax-SigmaMin)/2

Drehwinkel = atan(2*TauXY/(SigmaX-SigmaY))*90/pi


Danke für deine Hilfe, soweit klappt alles, aber er übergibt nur den ersten Wert mit der bezeichnung ans. Weißt du wie man das noch anpassen könnte. Danke schon im voraus.
Private Nachricht senden Benutzer-Profile anzeigen
 
Jan S
Moderator

Moderator


Beiträge: 11.057
Anmeldedatum: 08.07.10
Wohnort: Heidelberg
Version: 2009a, 2016b
     Beitrag Verfasst am: 20.11.2010, 17:49     Titel:
  Antworten mit Zitat      
Hallo Sebastian,

Statt VARARGIN ist NARGIN oft einfacher, aber recht ähnlich:
Code:
function [SigmaMax,SigmaMin,TauMax,Drehwinkel] = drehenKS(SigmaX, SigmaY, TauXY, alpha)
   
    if nargin == 4
          alpha = alpha *pi/180;
          SigmaPsi = (SigmaX+SigmaY)/2 + (SigmaX-SigmaY)/2 *cos(2*alpha) + TauXY*sin(2*alpha)
          SigmaEta = (SigmaX+SigmaY)/2 - (SigmaX-SigmaY)/2 *cos(2*alpha) - TauXY*sin(2*alpha)
          TauPsiEta = -(SigmaX - SigmaY)/2 *sin(2*alpha) - TauXY*cos(2*alpha)
    end
    ...
 

Aber wozu wird "alpha" überhaupt gebraucht, wenn Du später gar nicht mehr darauf zugreifst? Soll SigmaPsi etc auch als Ausgabe zurückgeliefert werden?

Um nun die Rückgabe-Werte im Caller auch zu erhalten, musst Du sie explizit abfrage:
Code:

[SigmaMax,SigmaMin,TauMax,Drehwinkel] = drehenKS(SigmaX, SigmaY, TauXY, alpha);
 

Das steht übrigens gut beschrieben im "Getting Started"-Kapitel in der Dokumentation. Jeder, der hier im Forum diese Fragen beantworten kann, hat das gelesen. Deshalb empfehle ich es wärmstens!

Gruß, Jan
Private Nachricht senden Benutzer-Profile anzeigen
 
Sebastian Kiebert
Themenstarter

Forum-Anfänger

Forum-Anfänger


Beiträge: 20
Anmeldedatum: 20.11.10
Wohnort: ---
Version: ---
     Beitrag Verfasst am: 20.11.2010, 18:31     Titel:
  Antworten mit Zitat      
Danke für die Hilfe.
Das "alpha" ist ja nur für die Berechnung von Psi und Eta von nöten.
Die anderen Werte brauche ich, da ich die Funktion in eine andere Funktion einbinden möchte, die auf die Werte zurückgreifen kann.
Private Nachricht senden Benutzer-Profile anzeigen
 
Sebastian Kiebert
Themenstarter

Forum-Anfänger

Forum-Anfänger


Beiträge: 20
Anmeldedatum: 20.11.10
Wohnort: ---
Version: ---
     Beitrag Verfasst am: 20.11.2010, 20:00     Titel:
  Antworten mit Zitat      
Ich habe deinen Rat befolgt:
Code:

function[SigmaMax,SigmaMin,TauMax,Drehwinkel]=drehenKS(SigmaX, SigmaY, TauXY, alpha)
    %%Der optionale Werte ist das Alpha für das gedrehte
    %Koordinatensystem für Psi und Eta.
    %Sonst werden nur die maximalen Spannungen, der Schub und der
    %Verdrehwinkelausgerechnet
    %
   
    if nargin == 4
     
      alpha = alpha *pi/180;
      SigmaPsi = (SigmaX+SigmaY)/2 + (SigmaX-SigmaY)/2 *cos(2*alpha) + TauXY*sin(2*alpha)
      SigmaEta = (SigmaX+SigmaY)/2 - (SigmaX-SigmaY)/2 *cos(2*alpha) - TauXY*sin(2*alpha)
      TauPsiEta = -(SigmaX - SigmaY)/2 *sin(2*alpha) - TauXY*cos(2*alpha)  
    end  

SigmaMax = (SigmaX+SigmaY)/2 + sqrt((SigmaX-SigmaY)^2 /4 + TauXY^2)
SigmaMin = (SigmaX+SigmaY)/2 - sqrt((SigmaX-SigmaY)^2 /4 + TauXY^2)
TauMax = (SigmaMax-SigmaMin)/2

Drehwinkel = atan(2*TauXY/(SigmaX-SigmaY))*90/pi

[SigmaMax,SigmaMin,TauMax,Drehwinkel]=drehenKS(SigmaX, SigmaY, TauXY);


Aber jetzt kommt der Fehler:
Code:

??? Maximum recursion limit of 500 reached. Use set(0,'RecursionLimit',N)
to change the limit.  Be aware that exceeding your available stack space can
crash MATLAB and/or your computer.

Error in ==> drehenKS


Das heißt ja, dass sich das Programm rekursiv immer wieder selber aufruft. Wie kann ich das unterbinden?
Private Nachricht senden Benutzer-Profile anzeigen
 
Achi
Forum-Guru

Forum-Guru


Beiträge: 250
Anmeldedatum: 14.04.10
Wohnort: ---
Version: R2007a
     Beitrag Verfasst am: 20.11.2010, 20:07     Titel:
  Antworten mit Zitat      
Indem du die letzte Zeile rausstreichst und mit genau dieser dein Programm aufrufst (im Workspace)
Private Nachricht senden Benutzer-Profile anzeigen E-Mail senden
 
Achi
Forum-Guru

Forum-Guru


Beiträge: 250
Anmeldedatum: 14.04.10
Wohnort: ---
Version: R2007a
     Beitrag Verfasst am: 20.11.2010, 20:11     Titel:
  Antworten mit Zitat      
Noch was, mach -> ; <- hinter dein Zeilen, sonst wird ALLES in den Workspace ausgegeben!
Private Nachricht senden Benutzer-Profile anzeigen E-Mail senden
 
Sebastian Kiebert
Themenstarter

Forum-Anfänger

Forum-Anfänger


Beiträge: 20
Anmeldedatum: 20.11.10
Wohnort: ---
Version: ---
     Beitrag Verfasst am: 20.11.2010, 20:12     Titel:
  Antworten mit Zitat      
vielen vielen Dank
Private Nachricht senden Benutzer-Profile anzeigen
 
Achi
Forum-Guru

Forum-Guru


Beiträge: 250
Anmeldedatum: 14.04.10
Wohnort: ---
Version: R2007a
     Beitrag Verfasst am: 20.11.2010, 21:33     Titel:
  Antworten mit Zitat      
kein Ding Very Happy
Private Nachricht senden Benutzer-Profile anzeigen E-Mail senden
 
Neues Thema eröffnen Neue Antwort erstellen



Einstellungen und Berechtigungen
Beiträge der letzten Zeit anzeigen:

Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen
.





 Impressum  | Nutzungsbedingungen  | Datenschutz | FAQ | goMatlab RSS Button RSS

Hosted by:


Copyright © 2007 - 2025 goMatlab.de | Dies ist keine offizielle Website der Firma The Mathworks

MATLAB, Simulink, Stateflow, Handle Graphics, Real-Time Workshop, SimBiology, SimHydraulics, SimEvents, and xPC TargetBox are registered trademarks and The MathWorks, the L-shaped membrane logo, and Embedded MATLAB are trademarks of The MathWorks, Inc.