Nothing
Code
dump_sql(m, d, skip_header = TRUE)
Output
ALTER TABLE `ds`
ADD `child` TEXT;
ALTER TABLE `ds`
ADD `workstatus` TEXT;
-- M1: maximum age
-- Age is limited.
--
-- R expression: if (age > 130) age <- 130
UPDATE `ds`
SET `age` = 130
WHERE `age` > 130.0;
-- M2: Child labor
-- A child should not work.
--
-- R expression: if (age < 12) {
-- income <- 0
-- child <- TRUE
-- }
UPDATE `ds`
SET `income` = 0
WHERE `age` < 12.0;
UPDATE `ds`
SET `child` = 1
WHERE `age` < 12.0;
-- M3: has job
-- Income means job.
-- R expression: if (income > 0) {
-- workstatus <- "job"
-- }
UPDATE `ds`
SET `workstatus` = 'job'
WHERE `income` > 0.0;
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.