Group Abstract Group Abstract

Message Boards Message Boards

0
|
4.8K Views
|
0 Replies
|
0 Total Likes
View groups...
Share
Share this post:

Create a function that returns an expression "canceled"?

I want to build a function that returns an expression "canceled". There goes my code.

SetAttributes[cancel,HoldFirst];
cancel[expr_]:= Show[
    Graphics[{
    {Arrowheads[{.04}],Arrow[{{-0.0001,-0.0001},{0.0001,0.0001}}]},
    {Text[expr]}
    }], ImageSize-> Tiny,BaselinePosition-> Bottom];
Divide[Row[{cancel[""(x-a)],x^n}],Row[{""(x^2+7),cancel[""(x-a)]}]]

enter image description here

• The coordinates of Arrow are not working (I thing).

• Am I missing something?

• Is there a better way to make the same thing?

• Does Mathematica have some similar procedure?

Thanks

Attachments:
POSTED BY: Ernesto Espinosa
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard