Difference between revisions of "Sandbox"
From Testiwiki
(→Urgenche energy balance test) |
(→Urgenche energy balance test) |
||
Line 9: | Line 9: | ||
D <- data.frame( | D <- data.frame( | ||
− | + | CHP_Peat = c(-1, 0, 1.205, 1.205, 0, -1), | |
− | + | CHP_Ren = c(-1, 0, -22.2, 0, 0, -1), | |
− | + | CHP_Mineral = c(-1, 0, 0, -7.40, 0, -1), | |
− | + | CHP_Heating = c(1, 1.43, 0, 0, 1, 0), | |
− | + | Production_loss = c(1, 0, 0, 0, 0, 1/0.18), | |
− | + | CHP_Electricity = c(1, -3.28, 0, 0, 0, 0) | |
− | CHP_Ren = c( | ||
− | CHP_Mineral = c( | ||
− | CHP_Heating = c(1, 1, | ||
− | |||
) | ) | ||
+ | D <- as.matrix(D) | ||
+ | |||
+ | print(xtable(D), type ='html') | ||
+ | B <- data.frame(Parameter = colnames(D), value = solve(D, c(0,0,0,0,heat, 0))) | ||
+ | print(xtable(B), type = 'html') | ||
A <- data.frame( | A <- data.frame( | ||
Line 43: | Line 44: | ||
print(xtable(B), type = 'html') | print(xtable(B), type = 'html') | ||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
Revision as of 11:37, 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