Debugging NDSolve[ ]

Good day!

https://www.wolframcloud.com/env/90cd9bc1-8547-4b0c-8311-6425deb12334

Mathematica 10 issued a singularity during calculation. Can you suggest which numerical method is best to use to program the solution? And evaluate this decision accordingly. Or you can still do something using Mathematica.

Welcome to Wolfram Community! Please make sure you know the rules: https://wolfr.am/READ-1ST

The rules explain how to format your code properly. Images don’t help other members to copy your code. Please EDIT your post and make sure code blocks start on a new paragraph and look framed and colored like this.

int = Integrate[1/(x^3 - 1), x];
Map[Framed, int, Infinity]

You can also embed notebook or attach notebook.