Learn R Programming

FEA (version 0.0.2)

PlotSystem.2d: PlotSystem.2d

Description

Generates heat map for given stress or strain on the geometry. Threshold values for the color must be assigned.

Usage

PlotSystem.2d(meshP, meshT, PlotVal, a, b, c, d, e, f, g, h, i, j,
                  Oc, ac, bc, cc, dc, ec, fc, gc, hc, ic, jc)

Value

Plot of colored polygon with mesh colored based on the plot value

Arguments

meshP

Matrix (2 x n) containing coordinate points of the mesh nodes.

meshT

Matrix (3 x n) containing the number of the coordinate point that forms a given triangle within the mesh.

PlotVal

Value to be plotted, either stress or strain, return from function LocalStress function.

a

Threshold 1

b

Threshold 2

c

Threshold 3

d

Threshold 4

e

Threshold 5

f

Threshold 6

g

Threshold 7

h

Threshold 8

i

Threshold 9

j

Threshold 10

Oc

Color 0

ac

Color 1

bc

Color 2

cc

Color 3

dc

Color 4

ec

Color 5

fc

Color 6

gc

Color 7

hc

Color 8

ic

Color 9

jc

Color 10

Examples

Run this code
# \donttest{
data(triMesh)
data(fea_result)

meshP = triMesh$MeshPts$p
meshT = triMesh$MeshPts$T
PlotVal = abs(fea_result$Stress[,1])
Oc = "slateblue"; ac = "steelblue2"; bc = "cyan2"; cc = "palegreen2";
dc = "darkolivegreen1"; ec = "lemonchiffon"; fc = "lightgoldenrod1"; gc = "gold";
hc= "lightsalmon"; ic= "tomato"; jc= "firebrick3"
a = 1e5;  b = 5e5;  c = 1e6;  d = 5e6;  e = 1e7;  f = 5e7;  g = 1e8;  h = 5e8; i = 1e9; j =5e9

PlotSystem.2d(meshP, meshT, PlotVal, a, b, c, d, e, f, g, h, i, j,
           Oc, ac, bc, cc, dc, ec, fc, gc, hc, ic, jc)
# }

Run the code above in your browser using DataLab