File:Contrainte resistance 3d proche.svg
From formulasearchengine
Jump to navigation
Jump to search
Size of this PNG preview of this SVG file: 503 × 367 pixels. Other resolutions: 320 × 233 pixels | 640 × 467 pixels | 1,024 × 747 pixels | 1,280 × 934 pixels | 2,560 × 1,868 pixels.
Original file (SVG file, nominally 503 × 367 pixels, file size: 482 KB)
This file is from Wikimedia Commons and may be used by other projects. The description on its file description page there is shown below.
Summary
DescriptionContrainte resistance 3d proche.svg |
Français : Méthode contrainte-résistance : densité de probabilité de couples contrainte-résistance (S, R) (surface), et marge nulle m = 0 (ligne, m = R – S). Français : Stress-strength method: probability density of stress-strength pairs (S, R) (surface), and zero margin m = 0 (line, m = R – S). |
Date | |
Source | Own work |
Author | Cdang |
Scilab source
This media was created with Scilab, a free open-source software. Here is a listing of the Scilab source used to create this file. |
// Initialisation
clear;
// constantes
n = 1e6; // nombre d'événements
Resp = 250; // espérance de la résistance
Rect = 17; // écart type ""
Sesp = 230; // espérance de la contrainte
Sect = 14 // écart type ""
sigma = 172:320; // ensemble de définition
taille = size(sigma, "c");
sigma3d = 172:5:320
taille3d = size(sigma3d, "c");
sigmaniv = 172:2:320;
tailleniv = size(sigmaniv, "c");
// Fonctions
densiteR = pdfnormal(sigma, Resp, Rect);
densiteS = pdfnormal(sigma, Sesp, Sect);
densiteR3d = pdfnormal(sigma3d, Resp, Rect);
densiteS3d = pdfnormal(sigma3d, Sesp, Sect);
densiteRniv = pdfnormal(sigmaniv, Resp, Rect);
densiteSniv = pdfnormal(sigmaniv, Sesp, Sect);
densiteegalite = densiteR.*densiteS;
for i=1:taille3d
densite3d(i, :) = densiteR3d(i)*densiteS3d;
// x = R, y = S
end
for i=1:tailleniv
densiteniv(i, :) = densiteRniv(i)*densiteSniv;
end
scf(0);
clf;
subplot(2,1,1)
plot(sigma, 100*densiteS, "r");
plot(sigma, 100*densiteR, "b");
xtitle("Méthode contrainte-résistance",...
"Contrainte (MPa)", "Densité de probabilité f (%/MPa)");
legend("Contrainte S", "Résistance R");
subplot(2,1,2)
plot(sigma, 100*densiteegalite, "k");
xtitle("Probabilité d''égalité",...
"Contrainte (MPa)", "Densité de probabilité f (%/MPa)");
scf(1);
clf;
plot3d1(sigma3d, sigma3d, 1e5*densite3d)
h3d = gce();
h3d.thickness = 0;
cmap = 1-0.7*graycolormap(100);
xset("colormap", cmap);
param3d(172*ones(sigma), sigma, 5e3*densiteS);
param3d(sigma, 172*ones(sigma), 5e3*densiteR)
param3d(sigma, sigma, 1e5*densiteegalite, 135, 30)
a = gca();
a.tight_limits="on";
xtitle("Probabilité de rupture", "Résistance R (MPa)", "Contrainte S (MPa)",...
"Densité de probabilité (u.a.)")
R = 269 + 17*rand(n, 1, "normal"); // résistance
S = 214 + 14*rand(n, 1, "normal"); // contrainte
Mbool = S>R; // comparaison des valeurs (matrice de booléens)
moyenne = sum(Mbool)/n; // les "vrai" comptent pour 1 et les "faux" pour 0
disp(string(100*moyenne)+" %") // affichage du résultat
scf(2)
clf;
grayplot(sigmaniv, sigmaniv, 1e5*densiteniv)
xpoly([172, 320], [172, 320]);
xset("colormap", cmap);
xtitle("Densité de probabilité",...
"Résistance R (MPa)", "Contrainte S (MPa)")
Licensing
I, the copyright holder of this work, hereby publish it under the following license:
This file is licensed under the Creative Commons Attribution-Share Alike 3.0 Unported license.
- You are free:
- to share – to copy, distribute and transmit the work
- to remix – to adapt the work
- Under the following conditions:
- attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
- share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
Items portrayed in this file
depicts
16 July 2013
image/svg+xml
16cce3b4b9f55cb04a73233261df7da0e90fcda2
493,355 byte
367 pixel
503 pixel
File history
Click on a date/time to view the file as it appeared at that time.
Date/Time | Thumbnail | Dimensions | User | Comment | |
---|---|---|---|---|---|
current | 13:09, 16 July 2013 | 503 × 367 (482 KB) | wikimediacommons>Cdang | the curves were misplaced |
File usage
There are no pages that use this file.