Difference between revisions of "Sandbox"
From Testiwiki
Juha Villman (talk | contribs) |
|||
Line 1: | Line 1: | ||
{{variable|moderator=Ehac}} | {{variable|moderator=Ehac}} | ||
+ | |||
+ | ==Urgenche energy balance test== | ||
+ | |||
+ | <rcode variables="name:heat|description:What is the amount of heat needed (kWh)?|default:500| | ||
+ | name:electricity|description:What is the amount of electricity needed (kWh)?|default:1000"> | ||
+ | library(OpasnetUtils) | ||
+ | library(xtable) | ||
+ | |||
+ | A <- data.frame( | ||
+ | MengeGas = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0), | ||
+ | MengeWarme = c(0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0), | ||
+ | MengeStrom = c(0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, -0.5), | ||
+ | MengeCO2 = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0), | ||
+ | KesselGas = c(-0.95, -55000, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0), | ||
+ | KesselWarme = c(1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0), | ||
+ | KesselCO2 = c(0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0), | ||
+ | GUDGas = c(0, 0, -0.47, -55000, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0), | ||
+ | GUDStrom = c(0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0), | ||
+ | GUDCO2 = c(0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0), | ||
+ | BHKWGas = c(0, 0, 0, 0, -0.3, 0, -55000, 0, 0, -1, 0, 0, 0, 0), | ||
+ | BHKWWarme = c(0, 0, 0, 0, 0, -0.5, 0, 0, 0, 0, -1, 0, 0, 0), | ||
+ | BHKWStrom = c(0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1, 0, 1), | ||
+ | BHKWCO2 = c(0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0) | ||
+ | ) | ||
+ | A <- as.matrix(A) | ||
+ | |||
+ | B <- data.frame(Parameter = colnames(A), value = solve(A, c(0, 0, 0, 0, 0, 0, 0, heat, electricity, 0, 0, 0, 0, 0))) | ||
+ | print(xtable(B), type = 'html') | ||
+ | |||
+ | |||
+ | </rcode> | ||
+ | |||
http://ytoswww/yhteiset/YMAL/Projects/ | http://ytoswww/yhteiset/YMAL/Projects/ |
Revision as of 09:18, 28 August 2012
This page is a variable.
The page identifier is Op_en1390 |
---|
Moderator:Ehac (see all) |
Give your opinion to the peer rating of the content of this page. |
Upload data
|
Contents
Urgenche energy balance test
http://ytoswww/yhteiset/YMAL/Projects/
Edited by ehacfff math ei jekkase Failed to parse (Missing <code>texvc</code> executable. Please see math/README to configure.): L_{Aeq} = 10 \log \int_{t_0}^{t_1} \frac{p_A^2(t)}{p_0^2} dt
Failed to parse (Missing <code>texvc</code> executable. Please see math/README to configure.): \alpha + 8884444
Failed to parse (Missing <code>texvc</code> executable. Please see math/README to configure.): \textstyle L_{Aeq} = 10 \log \int_{t_0}^{t_1} \frac{p_A^2(t)}{p_0^2} dt
ovariable merge testing
Static GoogleMaps test
Kuopio buildings on Google maps test
GoogleMaps Sorvi MML TEST
GoogleMaps PostgreSQL test 2
GoogleMaps PostgreSQL test
Opasnet.csv test
Opasnet.data and BUGS test
Failed to parse (Missing <code>texvc</code> executable. Please see math/README to configure.): \alpha 444 + 9999 / 123
Hello
- this works
Bluebox
- works
- ok
R-tools code include example
Rectangle area test