In statuser/RGremlinsConjoint: Estimate the "Gremlins in the Data" Model for Conjoint Studies

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%"
)

RGremlinsConjoint

The gremlins package provides the tools and utilities to estimate a the model described in "Gremlins in the Data: Identifying the Information Content of Research Subjects" ([https://doi.org/10.1177/0022243720965930]) using conjoint analysis data such as that collected in Sawtooth Software's Lighthouse or Discover Products. The packages also contains utility functions for formatting the input data and extracting the relevant results.

Installation

You can install the development version from GitHub with:

# install.packages("devtools")
devtools::install_github("statuser/RGremlinsConjoint")

Example

The package exposes basically one function You can use it like:

library(RGremlinsConjoint)

# Read in the data
truck_design_file <- system.file("extdata", "simTruckDesign.csv", package = "RGremlinsConjoint")
truck_data_file <- system.file("extdata", "simTruckData.csv", package = "RGremlinsConjoint")
truckDesign <- read.csv(truck_design_file)
truckData <- read.csv(truck_data_file)

# Covert the design file to be dummy coded is necessary
# The simulated data is already coded
# codedTruck <- code_sawtooth_design(truckDesign, c(4:9), include_none_option=TRUE)

outputSimData_burn <- estimateGremlinsModel(truckData,
                                            truckDesign,
                                            R = 10,
                                            keepEvery = 1,
                                            num_lambda_segments = 2)

statuser/RGremlinsConjoint documentation built on Sept. 13, 2023, 9:25 p.m.