Cost curves for energy: Difference between revisions

Revision as of 13:42, 5 May 2012

This page is a knowledge crystal of subtype variable. The page identifier is Op_en5478
Moderator:Jouni (see all)
This page is a stub. You may improve it into a full page.
Upload data {{#opasnet_base_link:Op_en5478}}

Question

What costs curves should be used for different energy products?

Answer

Cost curves for energy: Difference between revisions(-)
Obs	Row	Actor	Fuel	Use	Reference	Unit	Parameters	Description
1	1	Kuopion energia	Coal and peat	Demand	Current	€,ton	0, -0.06
2	2	Kuopio market	Coal and peat	Supply	Current	€,ton	0, 0.5

Parameter c_i are estimated from data: it is the current supply or demand given the current price (used as the point where p = 0).

+ Show code - Hide code


out <- formula.Op_en5478(dependencies.Op_en5478)
cat("Computed changes in energy production and consumption in a new situation.\n")
print(out)

Rationale

For detailed rationale, see Energy balance.

Failed to parse (SVG (MathML can be enabled via browser plugin): Invalid response ("Math extension cannot connect to Restbase.") from server "https://wikimedia.org/api/rest_v1/":): {\displaystyle \Sigma f_i(p) = \Sigma (a_i p^2 + b_i p + c_i) = 0}

Failed to parse (SVG (MathML can be enabled via browser plugin): Invalid response ("Math extension cannot connect to Restbase.") from server "https://wikimedia.org/api/rest_v1/":): {\displaystyle p = \frac{-\Sigma b_i \pm \sqrt{(\Sigma b_i)^2 - 4 \Sigma a_i \Sigma c_i}} {2 \Sigma a_i}}

Cost curves are parameterised in the way that the current price p = 0 and therefore the current supply or demand is c_i.

When a demand or supply changes, a new price p must be calculated based on f_i, and then the supplies and demands of other actors can be calculated, resulting in a new balance.

----#: . There is an alternative way to describe the functions:

Zero price is considered as 0 €/product unit. The true market price must be known. This function's parameters are more difficult to estimate. --Jouni 06:16, 28 January 2012 (EET) (type: truth; paradigms: science: comment)

----#: . There is also alternative possibilities for functional forms (p is the price of the product):

Exponential: P0 + P1 * exp(P2*p - P3) --Jouni 17:04, 28 January 2012 (EET) (type: truth; paradigms: science: comment)

Dependencies

Formula

+ Show code - Hide code


formula.Op_en5478 <- function(x) {
	data <- tidy(op_baseGetData("opasnet_base", x$curves[1]), direction = "wide")
	curves <- strsplit(as.character(data$Parameters), split = ",")
	coefficients <- data.frame(array(NA, dim = c(length(curves), 10)))

	for(j in 1:length(curves)) {
		coefficients[j, 1:length(curves[[j]])] <- curves[[j]]
	}
	coefficients[nrow(coefficients) + 1, 1] <- x$deviation
	for(k in 1:ncol(coefficients)) {
		coefficients[, k] <- ifelse(is.na(coefficients[, k]), 0, as.numeric(coefficients[, k]))
	}
	x.new <- polyroot(as.vector(colSums(coefficients)))
	x.new <- ifelse(abs(Im(x.new)) < 1e-6, Re(x.new), 1e+30) # Take only the real roots.
	x.new <- x.new[abs(x.new) == min(abs(x.new))] # Pick the root that is closest to zero (=BAU).
	y.new <- 0
	for(k in 1:ncol(coefficients)) {
		y.new <- y.new + coefficients[, k] * x.new^(k-1)
	}
	return(y.new)
}


dependencies.Op_en5478 <- list(
	curves = c("Op_en5478", "Cost curves for energy"),
	bau = c("Op_en5469", "Energy balance in Kuopio"),
	deviation = -5
)

**Urgenche research project 2011 - 2014: city-level climate change mitigation**
Urgenche pages Urgenche main page · Category:Urgenche · Urgenche project page (password-protected) Relevant data Building stock data in Urgenche‎ · Building regulations in Finland · Concentration-response to PM2.5 · Emission factors for burning processes · ERF of indoor dampness on respiratory health effects · ERF of several environmental pollutions · General criteria for land use · Indoor environment quality (IEQ) factors · Intake fractions of PM · Land use in Urgenche · Land use and boundary in Urgenche · Energy use of buildings Relevant methods Building model · Energy balance · Health impact assessment · Opasnet map · Help:Drawing graphs · OpasnetUtils‎ · Recommended R functions‎ · Using summary tables‎ City Kuopio Climate change policies and health in Kuopio (assessment) · Climate change policies in Kuopio (plausible city-level climate policies) · Health impacts of energy consumption in Kuopio · Building stock in Kuopio · Cost curves for energy (prioritization of options) · Energy balance in Kuopio (energy data) · Energy consumption and GHG emissions in Kuopio by sector · Energy consumption classes (categorisation) · Energy consumption of heating of buildings in Kuopio · Energy transformations (energy production and use processes) · Fuels used by Haapaniemi energy plant · Greenhouse gas emissions in Kuopio · Haapaniemi energy plant in Kuopio · Land use in Kuopio · Building data availability in Kuopio · Password-protected pages: File:Heat use in Kuopio.csv · Kuopio housing City Basel Buildings in Basel (password-protected) Energy balances Energy balance in Basel · Energy balance in Kuopio · Energy balance in Stuttgart · Energy balance in Suzhou

Keywords

References

Related files

@@ Line 14: / Line 14: @@
 Parameter c<sub>i</sub> are estimated from data: it is the current supply or demand given the current price (used as the point where p = 0).
+<rcode
+	name="answer"
+	label="Run code"
+	include="
+		page:Object-oriented_programming_in_Opasnet|name:answer|
+		page:OpasnetBaseUtils|name:generic|
+		page:Cost_curves_for_energy|name:formula
+	"
+>
+out <- formula.Op_en5478(dependencies.Op_en5478)
+cat("Computed changes in energy production and consumption in a new situation.\n")
+print(out)
+</rcode>
 == Rationale ==
@@ Line 65: / Line 81: @@
 		y.new <- y.new + coefficients[, k] * x.new^(k-1)
 	}
-	cat("Computed changes in energy production and consumption in a new situation.\n")
 	return(y.new)
 }
@@ Line 75: / Line 90: @@
 	deviation = -5
 )
-out <- formula.Op_en5478(dependencies.Op_en5478)
-print(out)
 </rcode>