gt_coase: Plot Coase Theorem Illustrations

Description Usage Arguments Examples

View source: R/gt_coase.R

Description

gt_coase plots the utility possibility set either from a bimatrix game or from a utlity possibility set paramaterized by pareto frontier f

Usage

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
gt_coase(X = NULL, Y = t(X), f = function(x) {     1 - x },
  pointsize = 1, SQ = c(0, 0), lab_SQ = TRUE, SQ_lab = "SQ",
  feasible = TRUE, bargain = FALSE, xlim = c(ifelse(matrix, min(X, Y), 0),
  ifelse(matrix, max(X, Y), 1.65)), ylim = xlim,
  xlab = expression(italic(u)[1]), ylab = expression(italic(u)[2]),
  main = "", mainsize = 1, addarrows = TRUE, figtitle = "",
  col1 = "red", col2 = "pink", col1b = col1, col2b = col2,
  arrcol = "black", offs = 0.15, textsz = 1, length = 0.1,
  axes = FALSE, mar = 2 * c(1, 1, 1, 1), mgpY = c(1, 1, 0), mgpX = c(1,
  1, 0))

Arguments

X

Payoff matrix

f

Function that mpas a possibility frontier

SQ

status quo outcome: defaults to minimax when game matrix provided

feasible

Include efasible set

bargain

Include bargaining set

Examples

1
2
3
4
#Illustration of bargaining outcomes from possibility set
gt.coase(f=function(x) 1-x^2, matrix=FALSE, feasible=TRUE,  bargain = TRUE,  SQ=c(0,1))
#Illustration of bargaining outcomes from matrix game
gt.coase(X=matrix(c(2,3,0,1),2), matrix=TRUE, feasible=TRUE,  bargain = TRUE)

macartan/hop documentation built on Jan. 4, 2022, 9:21 p.m.