In f0nzie/zFactor: Calculate the Compressibility Factor 'z' for Hydrocarbon Gases

knitr::opts_chunk$set(echo = TRUE)

Example 3-4

Calculate the aparent molecular weight of air given the components and mole fraction of each.

load(file = "../data/mc-ch3.rda")
names(ex35)
ex34["Ma"] <- ex34["mole_fraction"] * ex34["molecular_weight"]
M.a <- sum(ex34["Ma"])
print(M.a)

Example 3-5

Calculate the specific gravity of a gas of the following composition:

load(file = "../data/mc-ch3.rda")

Calculate the aparent molecular weight

Using equation 3-35.

names(ex35)
ex35["Ma"] <- ex35["mole_fraction"] * ex35["molecular_weight"]
M.a <- sum(ex35["Ma"])

M.air <- 29
gas.sg <- M.a / M.air
print(gas.sg)

f0nzie/zFactor documentation built on Aug. 2, 2019, 1:42 a.m.