Marketing - MaxDiff - Save Variable(s) - RLH (Root Likelihood)

Creates variables which contain RLH (root-likelihood) for each respondent, according to a MaxDiff latent class analysisMaxDiff latent class analysis or MaxDiff hierarchical BayesMaxDiff hierarchical Bayes output. You should select the output before running this script. If the model output contained holdout questions, variables for in-sample and holdout RLH will be created, otherwise, just one RLH variable will be created. Model outputs will first need to be recalculated if they were created prior to November 2018.

Example

The script produces a SUMMARY table of the new RLH variable(s):

Technical details

The RLH for each respondent is the geometric mean of the likelihoods of their tasks, i.e., the k^th root of the product of the likelihoods, where k is the number of tasks for the respondent.

How to apply this QScript

Start typing the name of the QScript into the Search features and data box in the top right of the Q window.
Click on the QScript when it appears in the QScripts and Rules section of the search results.

OR

Select Automate > Browse Online Library.
Select this QScript from the list.

Customizing the QScript

This QScript is written in JavaScript and can be customized by copying and modifying the JavaScript.

Customizing QScripts in Q4.11 and more recent versions

Start typing the name of the QScript into the Search features and data box in the top right of the Q window.
Hover your mouse over the QScript when it appears in the QScripts and Rules section of the search results.
Press Edit a Copy (bottom-left corner of the preview).
Modify the JavaScript (see QScripts for more detail on this).
Either:
- Run the QScript, by pressing the blue triangle button.
- Save the QScript and run it at a later time, using Automate > Run QScript (Macro) from File.

Customizing QScripts in older versions

Copy the JavaScript shown on this page.
Create a new text file, giving it a file extension of .QScript. See here for more information about how to do this.
Modify the JavaScript (see QScripts for more detail on this).
Run the file using Automate > Run QScript (Macro) from File.

JavaScript

includeWeb('QScript R Output Functions');

let r_code = `
if (is.null(input.maxdiff$rlh.out) && is.null(input.maxdiff$rlh)) {
    stop("RLH is not available for the MaxDiff Rank-Ordered Logit with Ties model")
}
if (is.null(input.maxdiff$rlh.out)) {
    input.maxdiff$rlh
} else {
    result <- cbind(input.maxdiff$rlh, input.maxdiff$rlh.out)
    colnames(result) <- c("In-sample RLH", "Holdout RLH")
    result
}
`;

saveVariables('RLH', 'MaxDiff',
              'input.maxdiff = ',
              r_code, null, null, 'rlh', 'FitMaxDiff');