Description Usage Arguments Value See Also Examples
View source: R/validation_error_srsc.R
The function plot the graph of errors with respect to sample sizes.
Error plot
Sample sizes
Error for each parameter
1 2 3 4 | error_srsc_error_visualization(
return.value.of_error_srsc,
log_scale_x.axis = TRUE
)
|
return.value.of_error_srsc |
A return value
of the function |
log_scale_x.axis |
A logical, whether x axis is log scale or not. |
A long format dataframe of error and its parameter name
error_srsc_variance_visualization
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 | # General plot
df <- data.frame(x=runif(100),y=runif(100),g= as.factor(rep(1:5,10)))
ggplot(df, aes(x = x, y = y, shape = g)) +
geom_point(size = 3) +
scale_shape_manual(values = c(1,2,3,4,5,6,7,8,9))
df <- data.frame(x=runif(100),y=runif(100),g= as.factor(rep(1:25,4)))
# Use slightly larger points and use custom values for the shape scale
ggplot(df, aes(x = x, y = y, shape = g)) +
geom_point(size = 3) +
scale_shape_manual(values = c(1,2,3,4,5,6,7,8,9,10,
11,12,13,14,15,16,17,18,19,20,21,22,23,24,25))
## Not run:
a <- error_srsc()
error_srsc_error_visualization(a)
#========================================================================================
# In case of C = 4, arbitrary C is available.
#========================================================================================
a <-error_srsc(NLvector = c(
100,
10000,
1000000
),
ratio=2,
replicate.datset =2,
ModifiedPoisson = FALSE,
mean.truth=0.6,
sd.truth=5.3,
z.truth =c(-0.8,0.7,2.38,3), # Here we use the C=4
ite =500
)
error_srsc_error_visualization(a)
error_srsc_variance_visualization(a)
#========================================================================================
# In case of C = 7, arbitrary C is available.
#========================================================================================
#'
a <-error_srsc(NLvector = c(
100,
10000,
100000
),
ratio=2,
replicate.datset =2,
ModifiedPoisson = FALSE,
mean.truth=0.6,
sd.truth=5.3,
z.truth =c(-0.8,0.7,2.38,3,3.4,3.6,3.8), # Here we use the C=7
ite =500
)
error_srsc_error_visualization(a)
error_srsc_variance_visualization(a)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.