Difference between revisions of "Sven/log.R"
From Organic Design wiki
(Receipt costs) |
m |
||
| (4 intermediate revisions by the same user not shown) | |||
| Line 1: | Line 1: | ||
| − | + | # {{R}} | |
| + | items <- c( | ||
ice = 11.97, | ice = 11.97, | ||
washingMachine = 190.44, | washingMachine = 190.44, | ||
fridge = 189.81, | fridge = 189.81, | ||
nextAssessment = 189, | nextAssessment = 189, | ||
| − | TV = | + | TV = 141.64, |
| + | DVD = 299.99, | ||
microwave = 263.99, | microwave = 263.99, | ||
| + | drill = 199.99, | ||
| + | laptopSupply = 190.13, | ||
| + | rounterSupply = 48.96, | ||
| + | printer = 99 | ||
) | ) | ||
| + | |||
| + | sum(items) | ||
| + | |||
| + | # Their estimate | ||
| + | sum(items) - 45*2 - 11.97 | ||
Latest revision as of 00:46, 6 June 2007
Code snipits and programs written in R, S or S-PLUS items <- c(
ice = 11.97,
washingMachine = 190.44,
fridge = 189.81,
nextAssessment = 189,
TV = 141.64,
DVD = 299.99,
microwave = 263.99,
drill = 199.99,
laptopSupply = 190.13,
rounterSupply = 48.96,
printer = 99
)
sum(items)
- Their estimate
sum(items) - 45*2 - 11.97
