# NOT RUN {
data <- system.file("extdata","soccer.data.txt", package = "ACA")
SDScan(namefi=data, xleg="Time", yleg="Goals per game", titl="Goals in
England: 1888-2014", onecol="n", daty="n", gray="y")
# }
# NOT RUN {
data <- system.file("extdata","amorese.data.txt", package = "ACA")
# }
# NOT RUN {
SDScan(namefi=data, xleg="Index", yleg="Value", titl="Change in
a Gaussian Sequence (with trend)", onecol="n", daty="n", gray="y")
# }
Run the code above in your browser using DataLab