eigen alnalysis

[hosiensg]

hi
for bottom script i don't have result,why?
wipe

model basic -ndm 2 -ndf 3

node 1 0. 0.
node 2 2. 0.
node 3 0. 1.
node 4 2. 1.
node 5 0. 2.
node 6 2. 2.

fix 1 1 1 1
fix 2 1 1 1

mass 3 2000.0 0. 0.
mass 4 2000.0 0. 0.
mass 5 2000.0 0. 0.
mass 6 2000.0 0. 0.

geomTransf Linear 1

set A 1
set E 1
set I 1
element elasticBeamColumn 1 1 3 $A $E $I 1
element elasticBeamColumn 2 2 4 $A $E $I 1
element elasticBeamColumn 3 3 4 $A $E $I 1
element elasticBeamColumn 4 3 5 $A $E $I 1
element elasticBeamColumn 5 4 6 $A $E $I 1
element elasticBeamColumn 6 5 6 $A $E $I 1

recorder display frame 850 250 500 500
vup 0 0 1 # dirn defining up direction of view plane(ghab bordar movazi)
vpn 1 1 1 # direction of outward normal to view plane(amud bar safhe ghab)
prp 1 1 0 # eye location in local coord sys defined by viewing system
viewWindow -1250 1250 -1250 1250
projection 2
display 1 5 4



set eigenValue [eigen 2]
for {set eig 1} {$eig<=2} {incr eig 1} {

recorder Node -file $eig.txt -node 4 6 -dof 1 "eigen $eig"
}