Maple - Error (in plots:-display)

[darida]

I tried this on maple:

eps1 := [0, 1/5, 2/5, 3/5, 4/5, 1]:
start1 := 2.3:
base1 := 1.1:
for i from 1 to 6 do
R := start1*base1**0:
points1 := [R, evalf(eval(mH, {M=1, r=R, epsilon = eps1}))]:
for a from 1 to 20 do
R := start1*base1**a:
points1 := points1, [R, evalf(eval(mH, {M=1, r=R, epsilon = eps1}))]:
end do:
end do:
plots[display]({
setoptions(symbol = diamond, symbolsize = 12, color = black),
plot([points1[1]]), pointplot([points1[1]]),
plot([points1[2]]), pointplot([points1[2]]),
plot([points1[3]]), pointplot([points1[3]]),
plot([points1[4]]), pointplot([points1[4]]),
plot([points1[5]]), pointplot([points1[5]]),
plot([points1[6]]), pointplot([points1[6]]),
},
textplot({[16,1.0, epsilon_ = 0.0],[16, 0.95, epsilon_ = 0.2],
[16, 0.84, epsilon_ = 0.4],[16, 0.95, epsilon_ = 0.6],
[16, 0.5, epsilon_ = 0.8],[16, 0.29, epsilon_ = 1.0]},
align={right},font=[TIMES,ROMAN,12]),
axes=boxed,
axis[1] = [mode = log, gridlines = [8, thickness = 1, subticks = false, color = grey]],
axis[2] = [gridlines = [color = grey]],
view = [2 .. 16, .25 .. 1.03]
);

But got this error:
Error, (in plots:-display) cannot make plot structure from object with name pointplot

What is wrong here?

Source: "www.diva-portal.org/smash/get/diva2:114136/FULLTEXT01.pdf‎"
Edit: Appendix A

 

[Valkarie]

.1 from the link above.The error is indicating that the pointplot is not valid. You need to use the plot command for both the plot and the pointplot. You can also use the setoptions command to configure the plot options. For example:eps1 := [0, 1/5, 2/5, 3/5, 4/5, 1]:start1 := 2.3:base1 := 1.1:for i from 1 to 6 do R := start1*base1**0:points1 := [R, evalf(eval(mH, {M=1, r=R, epsilon = eps1}))]:for a from 1 to 20 do R := start1*base1**a:points1 := points1, [R, evalf(eval(mH, {M=1, r=R, epsilon = eps1}))]:end do:end do:plots[display]({setoptions(symbol = diamond, symbolsize = 12, color = black),plot([points1[1]], style=point, symbol=diamond),plot([points1[2]], style=point, symbol=diamond),plot([points1[3]], style=point, symbol=diamond),plot([points1[4]], style=point, symbol=diamond),plot([points1[5]], style=point, symbol=diamond),plot([points1[6]], style=point, symbol=diamond),},textplot({[16,1.0, epsilon_ = 0.0],[16, 0.95, epsilon_ = 0.2],[16, 0.84, epsilon_ = 0.4],[16, 0.95, epsilon_ = 0.6],[16, 0.5, epsilon_ = 0.8],[16, 0.29, epsilon_ = 1.0]},align={right},font=[TIMES,ROMAN,12]),axes=boxed,axis[1] = [mode = log, grid