1# File src/library/base/R/license.R 2# Part of the R package, https://www.R-project.org 3# 4# Copyright (C) 1995-2015 The R Core Team 5# 6# This program is free software; you can redistribute it and/or modify 7# it under the terms of the GNU General Public License as published by 8# the Free Software Foundation; either version 2 of the License, or 9# (at your option) any later version. 10# 11# This program is distributed in the hope that it will be useful, 12# but WITHOUT ANY WARRANTY; without even the implied warranty of 13# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14# GNU General Public License for more details. 15# 16# A copy of the GNU General Public License is available at 17# https://www.R-project.org/Licenses/ 18 19licence <- license <- function() { 20 cat("\nThis software is distributed under the terms of the GNU General\n") 21 cat("Public License, either Version 2, June 1991 or Version 3, June 2007.\n") 22 cat("The terms of version 2 of the license are in a file called COPYING\nwhich you should have received with\n") 23 cat("this software and which can be displayed by RShowDoc(\"COPYING\").\n") 24 cat("Version 3 of the license can be displayed by RShowDoc(\"GPL-3\").\n") 25 cat("\n") 26 cat("Copies of both versions 2 and 3 of the license can be found\n") 27 cat("at https://www.R-project.org/Licenses/.\n") 28 cat("\n") 29 cat("A small number of files (the API header files listed in\n") 30 cat("R_DOC_DIR/COPYRIGHTS) are distributed under the\n") 31 cat("LESSER GNU GENERAL PUBLIC LICENSE, version 2.1 or later.\n") 32 cat("This can be displayed by RShowDoc(\"LGPL-2.1\"),\n") 33 cat("or obtained at the URI given.\n") 34 cat("Version 3 of the license can be displayed by RShowDoc(\"LGPL-3\").\n") 35 cat("\n") 36 cat("'Share and Enjoy.'\n\n") 37} 38