shuffletext

Write a function shuffletext$($ pairs, s$)$ that swaps characters of s as specified by the indices present in the pairs variable. pairs is a $2-$column matrix, where on each row, you are given the positions of the two characters you need to swap. If s is not given, use s$=\text{'}$O$0$O$0$O$0$OO$000$OO$0$OO$0$O$00$OOOOO$0$OO$00$O$0$O$0$OO$0$OO$000000$OO$0$OOOOO$00$O$0$O$00000$O$\text{'}$

$>>$ disp$($ shuffletext$([12],$ 'orange'$))$

roange

$>>$ disp$($ shuffletext$([12$; $21],$ 'orange'$))$

orange

$>>$ disp$($ shuffletext$([42$; $34],$ 'bare'$))$

bear

$>>$ pairs $=[14$; $46$; $56]$

pairs $=$

$14$

$46$

$56$

$>>$ disp$($ shuffletext$($ pairs, 'looped'$))$

poodle