Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Creating a Function to Display Numbers in Percent Format

• To: mathgroup at smc.vnet.net
• Subject: [mg128880] Creating a Function to Display Numbers in Percent Format
• From: Gregory Lypny <gregory.lypny at videotron.ca>
• Date: Sun, 2 Dec 2012 04:57:20 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-newout@smc.vnet.net
• Delivered-to: mathgroup-newsend@smc.vnet.net

Hello everyone,

I've written a function to display numbers in percent format.

percent[x_, numDec_: 1] := 
  PaddedForm[100 x, {500, numDec}, NumberPoint -> If[numDec == 0, "", "."], 
   DigitBlock -> {3, Infinity}, ExponentStep -> Infinity, 
   NumberSigns -> {{"-", "%"}, {"", "%"}}, NumberPadding -> {"", "0"}];

The problem with it is that the padding on the right appears after the percent sign so that percent[.0237, 6] returns 2.37%0000.  What am I doing wrong?

Regards,

Gregory

• Follow-Ups:
  • Re: Creating a Function to Display Numbers in Percent Format
    • From: Gregory Lypny <gregory.lypny@videotron.ca>
  • Re: Creating a Function to Display Numbers in Percent Format
    • From: Bob Hanlon <hanlonr357@gmail.com>