File:Roublellip.png: Difference between revisions

From Citizendium
Jump to navigation Jump to search
imported>Dmitrii Kouznetsov
(== Summary == Importing file)
Tag: Server-side upload
 
Line 1: Line 1:
== Summary ==
== Summary ==
{{Image_Details|user
Importing file
|description  = Approximation of the experimental data of price of the Russian [[rouble]], measured in the USA cent
|author      = [[User:Dmitrii Kouznetsov|Dmitrii Kouznetsov]] ([[User talk:Dmitrii Kouznetsov|talk]])
|date-created = 2014.12.11
|pub-country  = Japan
|notes        = Copied from TORI,  http://mizugadro.mydns.jp/t/index.php/File:Roublellip.png
|versions    = http://mizugadro.mydns.jp/t/index.php/File:Roublellip.png
}}
== Licensing ==
{{CC|by|3.0}}
==References==
https://www.mataf.net/en/currency/converter-RUB-USD RUSSIAN RUBLE TO US DOLLAR CONVERTER (EXCHANGE RATE 1 RUB = 0.0199 USD), 2014.11.29
 
http://mizugadro.mydns.jp/t/index.php/Approximations_of_ruble
 
http://mizugadro.mydns.jp/t/index.php/File:Roublellip.png
 
==[[C++]] generator of curves==
#include<math.h>
#include<stdio.h>
#include<stdlib.h>
#define DB double
#define DO(x,y) for(x=0;x<y;x++)
#include"ado.cin"
FILE *i,*o;
int main(){ int j,n,m,N=200;
char d[N][16];
DB f[N];
int di;
DB dr;
int day;
i=fopen("dollardata.txt","r");
fscanf(i,"%d",&day);
DO(n,N)
{ j=fscanf(i,"%s%d%lf",d[n],&di,&dr);
if(j<3) goto end;
f[n]=di+.001*dr;
printf("%1d %3d %s %2d %8.3lf %4d %6.4lf %6.4lf\n",j,n,d[n],di,dr,day-n,f[n],1000./f[n]);
}
end: N=n; fclose(i);
 
o=fopen("10.eps","w");
ado(o,720,320);
#define M(x,y) fprintf(o,"%6.4f %6.4f M\n",0.+x,0.+y);
#define L(x,y) fprintf(o,"%6.4f %6.4f L\n",0.+x,0.+y);
fprintf(o,"210 10 translate 10 10 scale\n");
for(n=0;n<31;n+=10) {M(-20,n)L(50,n)}
for(n=-20;n<51;n+=10) {M(n,0)L(n,30)}
fprintf(o,"0 0 0 RGB 2 setlinecap .1 W S\n");
DB x,y;
DO(n,N){x=(day-n)/10.; y=1000./f[n]; if(n==0) M(x,y) else L(x,y) }
fprintf(o,"0 1 0 RGB 1 setlinejoin 1 setlinecap 1 W S\n");
 
M(-12,30) L(50,0) fprintf(o,"0 0 0 RGB .2 W S\n");
 
DB z;
for(n=0;n<800;n++)
{x=.1*n-20.4; z=x+14.;
  z/=23.6;
  z*=z; 
  z= 1. - z;
  if(z<0) break; z=sqrt(z);
  z=z*2.94;
  y=10*z;
  if(n==0) M(x,y) else L(x,y)
}
fprintf(o,"1 0 0 RGB .1 W S\n");
 
fprintf(o,"showpage\n%c%cTrailer",'%','%'); fclose(o);
      system("epstopdf 10.eps");
      system(    "open 10.pdf");
printf("day of observaiton: %3d\n", day);
}
 
==Input data==
 
53
2014-12-19.53  61 999.27
2014-12-18.52  60 457.00
2014-12-17.51  68 311.40
2014-12-16.50  65 610.50
2014-12-15.49  58 453.60
2014-12-14.48  58 175.80
2014-12-13.47  58 229.50
2014-12-12.46  57 303.60
2014-12-11.45  54 958.80
2014-12-10.44  54 316.50
2014-12-09.43  54 207.30
2014-12-08.42  53 422.50
2014-12-07.41  52 677.50
2014-12-06.40  52 677.5
2014-12-05.39  53 722.00
2014-12-04.38  52 657.30
2014-12-03.37  54 729.00
2014-12-02.36  51 196.5
2014-12-01.35  52 329.9
2014-11-30.34  50 213.3
2014-11-29.33  50 213.3
2014-11-28.32  49 370.10
2014-11-27.31  47 359.80
2014-11-26.30  46 663.40
2014-11-25.29  45 292.32
2014-11-24.28  44 380.80
2014-11-23.27  45 772.90
2014-11-22.26  45 772.90
2014-11-21.25  45 481.20
2014-11-20.24  46 670.90
2014-11-19.23  46 965.50
2014-11-18.22  46 630.00
2014-11-17.21  47 392.50
2014-11-16.20  47 241.64
2014-11-15.29  47 346.0
2014-11-14.18  47 428.5
2014-11-13.17  46 284.5
2014-11-12.16  46 408.0
2014-11-11.15  46 143.70
2014-11-10.14  45 713.8
2014-11-09.13  46 610.9
2014-11-08.12  46 699.9
2014-11-07.11  47 937.0
2014-11-06.10  45 367.20
2014-11-05.09  44 531.6
2014-11-04.08  43 605.6
2014-11-03.07  43 359.8
2014-11-02.06  43 028.3
2014-11-01.05  43 028.3
2014-10-31.04  41 701.1
2014-10-30.03  43 388.0
2014-10-29.02  42 750.5
2014-10-28.01  42 403.5
2014-10-27.00  41 984.50
2014-10-26      41 895.20
2014-10-25      41 895.20
2014-10-24      41 926.50
2014-10-23      41 539.70
2014-10-22      41 000.30
2014-10-21      40 970.30
2014-10-20      40 934.30
2014-10-19      40 717.90
2014-10-18      40 717.90
2014-10-17      39 889.10
2014-10-16      39 889.10
2014-10-15      39 889.10
2014-10-14      39 889.10
2014-10-13      39 889.10
2014-10-12      39 889.10
2014-10-11      39 889.10
2014-10-10      39 889.10
2014-10-09      39 889.10
2014-10-08      39 889.10
2014-10-07      39 889.10
2014-10-06      39 975.10
2014-10-05      39 980.70
2014-10-04      39 571.00
2014-10-03      39 571.00
2014-10-02      39 571.00
2014-10-01      39 685.50
2014-09-30      39 431.50
2014-09-29      39 143.50
2014-09-28      39 152.70
2014-09-27      39 152.70
2014-09-26      38 494.80
2014-09-25      38 206.50
2014-09-24      38 581.00
2014-09-23      38 731.10
2014-09-22      38 432.20
2014-09-21      38 435.60
2014-09-20      38 435.60
2014-09-19      38 477.30
2014-09-18      38 432.90
2014-09-17      38 336.40
2014-09-16      38 302.80
2014-09-15      37 793.80
2014-09-14      37 785.30
2014-09-13      37 785.30
2014-09-12      37 532.40
2014-09-11      37 310.80
2014-09-10      37 093.10
2014-09-09      37 046.50
2014-09-08      36 975.80
2014-09-07      36 945.60
2014-09-06      36 945.60
2014-09-05      36 958.60
2014-09-04      36 806.70
2014-09-03      37 453.60
2014-09-02      37 328.10
2014-09-01      37 057.80
2014-08-31      37 068.00
2014-08-30      37 068.00
2014-08-29      36 754.00
2014-08-28      35 937.50
2014-08-27      36 164.90
2014-08-26      36 146.10
2014-08-25      36 141.30
2014-08-24      36 112.70
2014-08-23      36 112.70
2014-08-22      36 047.10
2014-08-21      36 367.10
2014-08-20      36 182.00
2014-08-19      36 082.10
2014-08-18      36 113.90
2014-08-17      36 127.70
2014-08-16      36 127.70
2014-08-15      36 029.60
2014-08-14      36 043.80
2014-08-13      36 213.10
2014-08-12      35 947.10
2014-08-11      36 148.90
2014-08-10      36 149.10
2014-08-09      36 149.10
2014-08-08      36 361.00
2014-08-07      36 174.10
2014-08-06      36 100.30
2014-08-05      35 831.90
2014-08-04      35 761.40
2014-08-03      35 753.90
2014-08-02      35 753.90
2014-08-01      35 728.90
2014-07-31      35 558.70
2014-07-30      35 813.00
2014-07-29      35 559.30
2014-07-28      35 115.30
2014-07-27      35 128.60
2014-07-26      35 128.60
2014-07-25      35 083.80
2014-07-24      34 879.80
2014-07-23      34 984.80
2014-07-22      35 170.30
2014-07-21      35 317.80
2014-07-20      35 317.80
2014-07-19      35 158.60
2014-07-18      35 266.00
2014-07-17      34 486.00
2014-07-16      34 399.30
2014-07-15      34 344.90
2014-07-14      34 199.50
2014-07-13      34 116.30
2014-07-12      34 116.30
2014-07-11      34 012.70
2014-07-10      33 918.00
2014-07-09      34 231.20
2014-07-08      34 432.30
2014-07-07      34 387.40
2014-07-06      34 404.20
2014-07-05      34 404.20
2014-07-04      34 305.50
2014-07-03      34 304.00
2014-07-02      34 355.00
2014-07-01      33 985.80
2014-06-30      33 722.00
2014-06-29      33 744.70
2014-06-28      33 744.70
2014-06-27      33 742.80
2014-06-26      33 634.60
2014-06-25      33 737.20
2014-06-24      33 791.70
2014-06-23      34 091.20
2014-06-22      34 462.20
2014-06-21      34 462.20
2014-06-20      34 475.00
2014-06-19      34 416.90
2014-06-18      34 455.40
2014-06-17      34 811.00
2014-06-16      34 602.60
2014-06-15      34 394.80
2014-06-14      34 394.80
2014-06-13      34 390.20
2014-06-12      34 344.60
2014-06-11      34 354.90
2014-06-10      34 289.80
2014-06-09      34 336.40
2014-06-08      34 409.70
2014-06-07      34 409.70
2014-06-06      34 407.30
2014-06-05      34 694.70
2014-06-04      34 970.60
2014-06-03      35 075.60
2014-06-02      35 043.00
2014-06-01      34 891.40
2014-05-31      34 891.40
 
The maximum was reached on 27 Oct 2014
1 000.00 US Dollar = 41 984.50 Russian Ruble
The minimum on 22 Feb 2009
1 000.00 US Dollar = 27.60 Russian Ruble
https://www.mataf.net/en/currency/converter-USD-RUB
 
==[[Latex]] generator of labels==
\documentclass[12pt]{article}
\usepackage{geometry}
\usepackage{graphicx}
\usepackage{rotating}
\usepackage{color}
\definecolor{pink}{RGB}{255,127,255}
\paperwidth 732pt
\paperheight 332pt
\textwidth 800pt
\textheight 400pt
\topmargin -92pt
\oddsidemargin -84pt
\newcommand \sx {\scalebox}
\newcommand \rot {\begin{rotate}}
\newcommand \ero {\end{rotate}}
\begin{document}
\begin{picture}(730,306)
\put(46,20){\sx{14.9}{\color{pink} \circle{50}}}
\put(10,10){\includegraphics{10}}
\put(-4,308){\sx{1.3}{Ruble}}
\put(-4,296){\sx{1.3}{in cents}}
\put(-4,282){\sx{1.3}{of USA}}
\put(0,210){\sx{2.5}{2}}
\put(0,110){\sx{2.5}{1}}
\put(0,10){\sx{2.5}{0}}
\put(80,-4){\sx{2.5}{$-100$}}
\put(214,-4){\sx{2.5}{$0$}}
\put(300,-4){\sx{2.5}{$100$}}
\put(400,-4){\sx{2.5}{$200$}}
\put(500,-4){\sx{2.5}{$300$}}
\put(640,-3){\sx{2.5}{$t$, days}}
\put(86,30){\sx{2.4}{\rot{90}{\bf 2014.05.31}\ero}}
\put(130,30){\sx{2.4}{\rot{90}{\bf 2014.07.19}\ero}}
\put(230,30){\sx{2.4}{\rot{90}{\bf 2014.10.27}\ero}}
\put(330,172){\sx{2.4}{\rot{90}{\bf 2015.02.04}\ero}}
\put(430,172){\sx{2.4}{\rot{90}{\bf 2015.05.15}\ero}}
\put(530,172){\sx{2.4}{\rot{90}{\bf 2015.08.23}\ero}}
\put(630,172){\sx{2.4}{\rot{90}{\bf 2015.12.01}\ero}}
\put(730,172){\sx{2.4}{\rot{90}{\bf 2016.03.10}\ero}}
\end{picture}
\end{document}

Latest revision as of 19:58, 11 March 2022

Summary

Importing file

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current19:58, 11 March 2022Thumbnail for version as of 19:58, 11 March 20221,519 × 689 (141 KB)Maintenance script (talk | contribs)== Summary == Importing file

You cannot overwrite this file.

There are no pages that use this file.

Metadata

This file contains additional information, probably added from the digital camera or scanner used to create or digitize it.

If the file has been modified from its original state, some details may not fully reflect the modified file.

Retrieved from "https://citizendium.org/wiki/index.php?title=File:Roublellip.png&oldid=14184"