HB: BCSSTK19 — Puente colgante — deflexión dinámica [RSA 817×817]

[ ]

; Harwell-Boeing — BCSSTK19 (RSA)
; 817x817 NNZ=3835
valores = [1052185771.011000037193298,27987254.378449998795986,930882387.483100056648254,1320529380213.0,489873802336.9000244140625,542545541.080399990081787,25155285.296750001609325,0.000006198883057,-19669.779695109999011,681563551077.4000244140625,170390887769.399993896484375,542546564.154999971389771,25155991.321959998458624,41067902.163180001080036,2252418631.339000225067139,681563551077.4000244140625,112620931.56700000166893,-2252418631.339000225067139,170390887769.399993896484375,542547649.58050000667572,25156748.871059998869896,-12378.107344160000139,681563551077.4000244140625,170390887769.399993896484375,542548803.089699983596802,25157563.689569998532534,0.000003814697266,-21948.172515769998427,41068976.0842399969697,-20528019.339579999446869,681563551077.4000244140625,170390887769.399993896484375,542550031.114699959754944,25158442.394420001655817,681563551077.4000244140625,170390887769.399993896484375,542551340.890699982643127,25159392.642549999058247,41070253.265060000121593,2252418631.339000225067139,681563551077.4000244140625,112620931.56700000166893,-2252418631.339000225067139,170390887769.399993896484375,542553168.56439995765686,25160681.21714000031352,41071141.671649999916553,0.000091552734375,-15102.992481350000162,681563551077.4000244140625,170390887769.399993896484375,542554682.968299984931946,-26198.918680790000508,41071958.608110003173351,-20528019.33959000185132,681563551077.5,170390887769.399993896484375,542556308.103399991989136,25163051.837689999490976,681563551077.5,170390887769.399993896484375,542558055.968299984931946,41073871.581710003316402,-17832.902542449999601,681563551077.4000244140625,170390887769.399993896484375,542559940.215000033378601,-30285.059865459999855,681563551077.4000244140625,170390887769.399993896484375,542561976.395900011062622,41076270.126539997756481,2252418631.339000225067139,681563551077.5,112620931.56700000166893,-2252418631.339000225067139,170390887769.399993896484375,542564182.234300017356873,25169382.514940001070499,-21671.235120360001019,681563551077.5,170390887769.399993896484375,542566577.906499981880188,-35812.556261389996507,681563551077.4000244140625,170390887769.399993896484375,542569779.084800004959106,25174116.926199998706579,41081504.013369999825954,-25465.334204419999878,681563551077.4000244140625,170390887769.399993896484375,542572655.303599953651428,-41123.100018910001381,41083722.273309998214245,-20528019.33959000185132,681563551077.5,170390887769.399993896484375,542575801.510900020599365,681563551077.5,170390887769.399993896484375,542579249.230599999427795,41089408.667850002646446,2252418631.339000225067139,681563551077.5,112620931.56700000166893,-2252418631.339000225067139,170390887769.399993896484375,542583031.228999972343445,25187089.579879999160767,-37076.245250410000153,681563551077.5,170390887769.399993896484375,542587178.520300030708313,25191695.628789998590946,0.000062942504883,-56080.111734760001127,-20528019.339579999446869,681563551077.4000244140625,170390887769.29998779296875,542591713.951900005340576,41103235.637890003621578,681563551077.4000244140625,170390887769.399993896484375,542596638.931599974632263,25203569.324489999562502,41110319.655299998819828,2252418631.339000225067139,681563551077.4000244140625,112620931.566899999976158,-2252418631.339000225067139,170390887769.29998779296875,542601906.184200048446655,25211322.638399999588728,41119484.538460001349449,0.000579833984375,-63445.859298909999779,681563551077.4000244140625,170390887769.399993896484375,542607363.459499955177307,-85114.941143639996881,-20528019.33959000185132,681563551077.5,170390887769.399993896484375,542612635.494500041007996,25232215.301750000566244,681563551077.4000244140625,170390887769.29998779296875,407599226.208000004291534,19375527.174019999802113,23274117.959120001643896,-2630000.452930999919772,559102248.183500051498413,522833942128.5999755859375,27955112.409189999103546,-559102248.183500051498413,91026083294.92999267578125,-780896979.898599982261658,19010.267047159999493,494197242.898599982261658,16365229118.309999465942383,-2252418631.339000225067139,15400436.35287999920547,18617647749.650001525878906,19010.267047159999493,-10948.900649249999333,1320529380212.0,112620931.56700000166893,2252418631.339000225067139,489873802336.70001220703125,542545541.080399990081787,-25155285.296750001609325,12567807.75853000022471,19669.779695109999011,41067427.196549996733665,-0.000015258789062,681563551077.5,112620931.56700000166893,2252418631.339000225067139,170390887769.399993896484375,-34995.910568539999076,20375.804901489998883,20375.804901489998883,-11863.484008229999745,681563551077.5,112620931.56700000166893,2252418631.339000225067139,170390887769.399993896484375,0.000015258789062,-271255784.122200012207031,21133.354002219999529,12567807.75853000022471,681563551077.5,112620931.56700000166893,2252418631.339000225067139,170390887769.399993896484375,21948.172515769998427,-2252418631.339000225067139,681563551077.5,112620931.56700000166893]
suma_cuad = 0.0
i = 1
para i de 1 hasta 200
    suma_cuad = suma_cuad + valores[i] * valores[i]
finpara
frob_m = raiz(suma_cuad)
frob_t = raiz(suma_cuad * 7.57)
mostrar "=== BCSSTK19: 817x817 NNZ=3835 ==="
mostrar "Tipo: RSA — Rigidez estructural"
mostrar "Sparsidad (%):"
mostrar 0.5745
mostrar "Frob Jota (muestra 200/1514):"
mostrar frob_m
mostrar "Frob estimada total:"
mostrar frob_t
mostrar "Frob referencia: 471326120632399.0625"
mostrar "Max valor:"
mostrar maximo(valores)
mostrar "Min valor:"
mostrar minimo(valores)
graficar_histograma(valores, 20, "BCSSTK19 valores")

Salida Jota: === BCSSTK19: 817x817 NNZ=3835 === Salida Jota: Tipo: RSA — Rigidez estructural Salida Jota: Sparsidad (%): Salida Jota: 0.574 Salida Jota: Frob Jota (muestra 200/1514): Salida Jota: 4305131758222.660 Salida Jota: Frob estimada total: Salida Jota: 11844981514520.232 Salida Jota: Frob referencia: 471326120632399.0625 Salida Jota: Max valor: Salida Jota: 1320529380213.000 Salida Jota: Min valor: Salida Jota: -2252418631.339

Shift + Enter ejecuta la celda actual

Ayuda de Jota