# Calculate and test the local slope of the plot at large values.

### Description

Calculates the effective slope of the plot at large values and tests the deviation of the largest value from that line (Cox, 2011).

### Usage

1 | ```
local_slope(p, k)
``` |

### Arguments

`p` |
Vector of |

`k` |
Number of 'top' |

### Value

`local_slope ` |
The estimated local slope of the plot at large values. |

`test_statistic ` |
The value of the test statistic. |

`Fvalue ` |
The upper 5% value of the F distribution with |

`pvalue ` |
The |

### Author(s)

Christiana Kartsonaki

### References

Cox, D. R. (2011). Discovery: a statistical perspective. *Phystat Conference CERN*.

### See Also

`plot_pvalues`

### Examples

1 2 3 4 | ```
# generate a vector of p values
p <- runif(100, 0, 1)
local_slope(p, 10)
``` |