I suggest doing this:
Pt-Off(X+1,Y+1,2)
Pt-Off(X+1,Y+1)
Pt-Off(X+4,Y+1,2)
Pt-Off(X+4,Y+1)
Pt-Off(X+1,Y+4,2)
Pt-Off(X+1,Y+4)
Pt-Off(X+4,Y+4,2)
Pt-Off(X+4,Y+4)
It's not very elegant, but it's the best I can come up with.
If you can deal with it being 8 pixels long (but still 6 wide), I strongly recommend doing this:
Text(-1,Y,X,"   // One space

Good luck!

I do appreciate all of the suggestions, but I have decided to stick with the small spaces, and add an inconspicuous pixel under text on the start menu. It checks to see if it's there, and if not, it shows an error screen which explains that the user needs to open and close the table and restart the program. 

Remember that this won't work on the MP OSes (Because TI is lame).

However, if you still want to go through with it, use this code instead of exiting:
:G-T
:DispGraph
:Full
This will automatically display the table, so then you don't even have to exit the program.