spend.plot.average.transaction.value {BTYD} R Documentation

## Plot Actual vs. Expected Average Transaction Value

### Description

Plots the actual and expected densities of average transaction values, and returns a vector with each customer's average transaction value probability.

### Usage

```spend.plot.average.transaction.value(
params,
m.x.vector,
x.vector,
xlab = "Average Transaction Value",
ylab = "Marginal Distribution of Average Transaction Value",
title = "Actual vs. Expected Average Transaction Value Across Customers"
)
```

### Arguments

 `params` a vector of gamma-gamma parameters: p, q, and gamma, in that order. p is the shape parameter for each transaction. The scale parameter for each transaction is distributed across customers according to a gamma distribution with parameters q (shape) and gamma (scale). `m.x.vector` a vector with each customer's average observed transaction value in the calibration period. `x.vector` a vector with the number of transactions each customer made in the calibration period. Must correspond to m.x.vector in terms of ordering of customers and length of the vector. `xlab` descriptive label for the x axis. `ylab` descriptive label for the y axis. `title` title placed on the top-center of the plot.

### Value

a vector with the probability of each customer's average transaction value.

`spend.marginal.likelihood`

### Examples

```## Not run:
data(cdnowSummary)
ave.spend <- cdnowSummary\$m.x
tot.trans <- cdnowSummary\$cbs[,"x"]
# params <- c(6.25, 3.74, 15.44) # in original documentation. check below:
params <- spend.EstimateParameters(m.x.vector = ave.spend, x.vector = tot.trans)

# Plot the actual and expected average transaction value across customers.
f.m.x <- spend.plot.average.transaction.value(params, ave.spend, tot.trans)

## End(Not run)
```

[Package BTYD version 2.4.3 Index]