[med-svn] [r-cran-shape] 04/08: New upstream version 1.4.3

[Andreas Tille]

This is an automated email from the git hooks/post-receive script.

tille pushed a commit to branch master
in repository r-cran-shape.

commit 8686177b53160bbbfb28b3eb6f774a32a33e8396
Author: Andreas Tille <tille at debian.org>
Date:   Fri Sep 29 15:45:53 2017 +0200

    New upstream version 1.4.3
---
 DESCRIPTION        |  16 ++++++++--------
 MD5                |  10 +++++-----
 NAMESPACE          |  11 +++++++++--
 R/Arrows.R         |   6 +++++-
 build/vignette.rds | Bin 239 -> 240 bytes
 inst/doc/shape.pdf | Bin 688695 -> 671604 bytes
 6 files changed, 27 insertions(+), 16 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index b139b22..a442056 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,18 +1,18 @@
 Package: shape
-Version: 1.4.2
-Date: 2014-06-01
-Title: Functions for plotting graphical shapes, colors
+Version: 1.4.3
+Title: Functions for Plotting Graphical Shapes, Colors
 Author: Karline Soetaert <karline.soetaert at nioz.nl>
 Maintainer: Karline Soetaert <karline.soetaert at nioz.nl>
-Depends: R (>= 2.01), stats
+Depends: R (>= 2.01)
+Imports: stats, graphics, grDevices
 Description: Functions for plotting graphical shapes
   such as ellipses, circles, cylinders, arrows, ...
 License: GPL (>= 3)
 LazyData: yes
-Packaged: 2014-11-01 08:24:56 UTC; rforge
 Repository: CRAN
 Repository/R-Forge/Project: diagram
-Repository/R-Forge/Revision: 68
-Repository/R-Forge/DateTimeStamp: 2014-11-01 08:20:54
-Date/Publication: 2014-11-05 14:14:32
+Repository/R-Forge/Revision: 80
+Repository/R-Forge/DateTimeStamp: 2017-08-15 08:01:44
+Date/Publication: 2017-08-16 08:59:39 UTC
 NeedsCompilation: no
+Packaged: 2017-08-15 08:05:13 UTC; rforge
diff --git a/MD5 b/MD5
index 0a8a709..d3da74d 100644
--- a/MD5
+++ b/MD5
@@ -1,8 +1,8 @@
-a5ce489655bb2f86d2e435aac207623b *DESCRIPTION
-d3cef2136fa9a712a3f4dec02c59e969 *NAMESPACE
+0abbe9052c31a3c5d3a76a948a36f8a5 *DESCRIPTION
+17a2b53b4081ae9dfc682f63e5088a68 *NAMESPACE
 efa927382bbe9a530ada0f4d38e99be6 *R/A4.R
 98f9537d32de4a1a015cf1da2c59d6c5 *R/Arrowhead.R
-1d7acd3cc09a34c7abc218c904c5fa98 *R/Arrows.R
+ec54ac0ec45792c07b198ac797f58862 *R/Arrows.R
 19cb3f505acade9ba0a4e9ab80eff311 *R/colorlegend.R
 cc167725e526aeb0764fbe783bc8cfc5 *R/cylindersegment.R
 ddca2475a00d273e26ad30e695d0dca8 *R/drapecol.R
@@ -25,12 +25,12 @@ e61b5d2dddeea1f0b140d46792485d86 *R/rotatexy.R
 74bc7ca165e5b6d0893af9ea6d336393 *R/shape.R
 e16b25fc0b92a4b4cccba50d807ac42d *R/textflag.R
 c4acb2c455c83208ba03c9f2f2a3c495 *R/writelabel.R
-543edfb21c08f5ede4ff8d47b248392f *build/vignette.rds
+80d89d6680c8ce4b3dffe81bed7fb44a *build/vignette.rds
 6f82ba13a638ebf4457960bbf1970667 *demo/00Index
 0520bb297e5ed022fe7dd43778e45030 *demo/colorshapes.r
 0c6605dd0291458541bc2109fa89a142 *inst/doc/shape.R
 109efb168e2ca7f67f296d744230e9d9 *inst/doc/shape.Rnw
-7680a1ec321757075cd8752cf5c9deee *inst/doc/shape.pdf
+d5520cbca5d988bdfae355409b2309d7 *inst/doc/shape.pdf
 65c606d6c046b949c8c8503d395c9c3f *man/A4.Rd
 b5ad212b50734649257fd646855dfa89 *man/Arrowhead.Rd
 e95600c3fd319838832d6680f88dcafd *man/Arrows.Rd
diff --git a/NAMESPACE b/NAMESPACE
index 4574b7e..3af2e52 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -1,2 +1,9 @@
-export(A4, Arrowhead, Arrows, colorlegend, cylindersegment, drapecol, emptyplot, femmecol, filledcircle, filledcylinder, filledellipse, filledmultigonal, filledrectangle, filledshape, getellipse, graycol, greycol, intpalette, plotcircle, plotellipse, rotatexy, roundrect, shadepalette, writelabel, textflag)
-
+importFrom("grDevices", "col2rgb", "dev.new", "rgb")
+importFrom("graphics", "arrows", "lines", "mtext", "par", "plot",
+           "polygon", "rect", "segments", "text")
+importFrom("stats", "approx")
+export(A4, Arrowhead, Arrows, colorlegend, cylindersegment, drapecol, emptyplot, femmecol, 
+       filledcircle, filledcylinder, filledellipse, filledmultigonal, filledrectangle, filledshape, 
+       getellipse, graycol, greycol, intpalette, plotcircle, plotellipse, rotatexy, roundrect, 
+       shadepalette, writelabel, textflag)
+
diff --git a/R/Arrows.R b/R/Arrows.R
index 7ab7c10..2d2d796 100644
--- a/R/Arrows.R
+++ b/R/Arrows.R
@@ -36,7 +36,11 @@ Arrows <- function(x0, y0, x1, y1, code=2,
   angle [x1<x0] <-180+angle[x1<x0]
   xx<-x1
   yy<-y1
-
+  if (sy < 0 & sx < 0) 
+    angle <- angle + 180
+  else if (sx < 0) 
+    angle <- angle + 180
+  
   ## code =3 draws two arrowheads
   if (code == 3)
     Arrowhead(x0=xx,y0=yy,angle=angle,
diff --git a/build/vignette.rds b/build/vignette.rds
index 310556e..8e42a75 100644
Binary files a/build/vignette.rds and b/build/vignette.rds differ
diff --git a/inst/doc/shape.pdf b/inst/doc/shape.pdf
index a2b506e..dda7bc7 100644
Binary files a/inst/doc/shape.pdf and b/inst/doc/shape.pdf differ

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-med/r-cran-shape.git