OpenIO: Difference between revisions
Jump to navigation
Jump to search
(Created page with "{{variable|moderator=Teemu R|stub=Yes}} Category:Life cycle assessment == Question == OpenIO contains data that is be used in economic input-output life cycle assessment...") |
m (→Answer) |
||
| Line 9: | Line 9: | ||
{{resultlink}} | {{resultlink}} | ||
=== Total IO requirements Calculation Example === | |||
<pre> | |||
library(OpasnetUtils) | |||
dr <- opbase.data("Op_en7462", subset = "Direct_requirements") | |||
A <- tapply(dr$Result, dr[c("User", "Maker")], I) | |||
tr <- solve(diag(1, dim(A)[1]) - A) | |||
tr <- as.data.frame(as.table(tr)) | |||
colnames(tr) <- c("Selling_sector", "Purchasing_sector", "Result") | |||
</pre> | |||
== Rationale == | == Rationale == | ||
Revision as of 16:18, 18 March 2016
| Moderator:Teemu R (see all) |
| This page is a stub. You may improve it into a full page. |
| Upload data
|
Question
OpenIO contains data that is be used in economic input-output life cycle assessment.
Answer
{{#opasnet_base_link:Op_en7462}}
Total IO requirements Calculation Example
library(OpasnetUtils)
dr <- opbase.data("Op_en7462", subset = "Direct_requirements")
A <- tapply(dr$Result, dr[c("User", "Maker")], I)
tr <- solve(diag(1, dim(A)[1]) - A)
tr <- as.data.frame(as.table(tr))
colnames(tr) <- c("Selling_sector", "Purchasing_sector", "Result")
Rationale
- Data tables extracted from OpenIO_beta1.5_C2C031711.ana
See also
Keywords
References