1 | ///
|
---|
2 | /// This file is part of ILNumerics Community Edition.
|
---|
3 | ///
|
---|
4 | /// ILNumerics Community Edition - high performance computing for applications.
|
---|
5 | /// Copyright (C) 2006 - 2012 Haymo Kutschbach, http://ilnumerics.net
|
---|
6 | ///
|
---|
7 | /// ILNumerics Community Edition is free software: you can redistribute it and/or modify
|
---|
8 | /// it under the terms of the GNU General Public License version 3 as published by
|
---|
9 | /// the Free Software Foundation.
|
---|
10 | ///
|
---|
11 | /// ILNumerics Community Edition 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 | /// You should have received a copy of the GNU General Public License
|
---|
17 | /// along with ILNumerics Community Edition. See the file License.txt in the root
|
---|
18 | /// of your distribution package. If not, see <http://www.gnu.org/licenses/>.
|
---|
19 | ///
|
---|
20 | /// In addition this software uses the following components and/or licenses:
|
---|
21 | ///
|
---|
22 | /// =================================================================================
|
---|
23 | /// The Open Toolkit Library License
|
---|
24 | ///
|
---|
25 | /// Copyright (c) 2006 - 2009 the Open Toolkit library.
|
---|
26 | ///
|
---|
27 | /// Permission is hereby granted, free of charge, to any person obtaining a copy
|
---|
28 | /// of this software and associated documentation files (the "Software"), to deal
|
---|
29 | /// in the Software without restriction, including without limitation the rights to
|
---|
30 | /// use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
|
---|
31 | /// the Software, and to permit persons to whom the Software is furnished to do
|
---|
32 | /// so, subject to the following conditions:
|
---|
33 | ///
|
---|
34 | /// The above copyright notice and this permission notice shall be included in all
|
---|
35 | /// copies or substantial portions of the Software.
|
---|
36 | ///
|
---|
37 | /// =================================================================================
|
---|
38 | ///
|
---|
39 |
|
---|
40 | using System;
|
---|
41 | using System.Collections.Generic;
|
---|
42 | using System.Text;
|
---|
43 | using ILNumerics;
|
---|
44 | using ILNumerics.Exceptions;
|
---|
45 | using ILNumerics.Storage;
|
---|
46 | using ILNumerics.Misc;
|
---|
47 |
|
---|
48 | namespace ILNumerics {
|
---|
49 | public partial class ILMath {
|
---|
50 | /// <summary>
|
---|
51 | /// Create logarithmically spaced row vector of 30 elements
|
---|
52 | /// </summary>
|
---|
53 | /// <param name="start">First exponent value</param>
|
---|
54 | /// <param name="end">Last exponent value</param>
|
---|
55 | /// <returns>Row vector with 30 elements logathmically spaced between 10^start and 10^end</returns>
|
---|
56 | public static ILRetArray<double> logspace (ILInArray<double> start, ILInArray<double> end) {
|
---|
57 | return logspace(start, end,30);
|
---|
58 | }
|
---|
59 |
|
---|
60 | /// <summary>
|
---|
61 | /// Create logarithmically spaced row vector
|
---|
62 | /// </summary>
|
---|
63 | /// <param name="start">First exponent value</param>
|
---|
64 | /// <param name="end">Last exponent value</param>
|
---|
65 | /// <param name="length">Number of elements to create</param>
|
---|
66 | /// <returns>Row vector with 'length' elements logarithmically spaced between 10^start and 10^end</returns>
|
---|
67 | public static ILRetArray<double> logspace (ILInArray<double> start, ILInArray<double> end, ILInArray<double> length) {
|
---|
68 | using (ILScope.Enter(start,end, length)) {
|
---|
69 | if (end == ILMath.pi)
|
---|
70 | end = Math.Log10(pi);
|
---|
71 | if (length < 2)
|
---|
72 | return new ILRetArray<double>(new double[1]{Math.Pow(10,(double)end)},1,1);
|
---|
73 | ILArray<double> fact = ( end - start ) / (length - 1);
|
---|
74 | return pow(10.0, linspace<double>(start,end,length));
|
---|
75 | }
|
---|
76 | }
|
---|
77 | }
|
---|
78 | }
|
---|