#@@ Make this a function also # For column ix, create an array of functions based on the 2der, indices, values info # Create a Gaussian function Aexp(-a(j -μ)^2) where µ= minimum index, # inputs: column index, lists of min indices, min 2derivs, and min values # Output: array of functions # Description: ix=1 mu <- minima_indices [[ix]] der2 <- minima_2der [[ix]] A <- minima_values [[ix]] a <- der 2/(2*A) 1mu <- length (mu) jvec-1:1024 gf <- array(c(0), dim = c(1mu,1024)) for (i in 1:1mu) { gf [1,] } exp(a[i]*(jvec-mu[i])^2)

Database System Concepts
7th Edition
ISBN:9780078022159
Author:Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Chapter1: Introduction
Section: Chapter Questions
Problem 1PE
icon
Related questions
Question

R Programming

I need to create a function:

(@@ Make this a function also
# For column ix, create an array of functions based on the 2der, indices, values info
# Create a Gaussian function Aexp(−a(j − μ)^2) Where μ= minimum index,
# inputs: column index, lists of min indices, min 2derivs, and min values
# Output: array of functions)

 

#@@ Make this a function also
# For column ix, create an array of functions based on the 2der, indices, values info
where μ= minimum index,
# Create a Gaussian function Aexp(-a(j-μ)^2)
# inputs: column index, lists of min indices, min 2derivs, and min values
# Output: array of functions
# Description:
ix=1
mu <- minima_indices [[ix]]
der 2 < minima_2der [[ix]]
A <- minima_values [[ix]]
a <- der 2/(2*A)
length (mu)
1 mu
jvec-1:1024
gf <- array(c(0), dim = c(1mu,1024))
for (i in 1:1mu) {
gf[i,] = exp(a[i]* (jvec-mu[i])^2)
Transcribed Image Text:#@@ Make this a function also # For column ix, create an array of functions based on the 2der, indices, values info where μ= minimum index, # Create a Gaussian function Aexp(-a(j-μ)^2) # inputs: column index, lists of min indices, min 2derivs, and min values # Output: array of functions # Description: ix=1 mu <- minima_indices [[ix]] der 2 < minima_2der [[ix]] A <- minima_values [[ix]] a <- der 2/(2*A) length (mu) 1 mu jvec-1:1024 gf <- array(c(0), dim = c(1mu,1024)) for (i in 1:1mu) { gf[i,] = exp(a[i]* (jvec-mu[i])^2)
Expert Solution
steps

Step by step

Solved in 3 steps with 1 images

Blurred answer
Knowledge Booster
Arrays
Learn more about
Need a deep-dive on the concept behind this application? Look no further. Learn more about this topic, computer-science and related others by exploring similar questions and additional content below.
Similar questions
Recommended textbooks for you
Database System Concepts
Database System Concepts
Computer Science
ISBN:
9780078022159
Author:
Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:
McGraw-Hill Education
Starting Out with Python (4th Edition)
Starting Out with Python (4th Edition)
Computer Science
ISBN:
9780134444321
Author:
Tony Gaddis
Publisher:
PEARSON
Digital Fundamentals (11th Edition)
Digital Fundamentals (11th Edition)
Computer Science
ISBN:
9780132737968
Author:
Thomas L. Floyd
Publisher:
PEARSON
C How to Program (8th Edition)
C How to Program (8th Edition)
Computer Science
ISBN:
9780133976892
Author:
Paul J. Deitel, Harvey Deitel
Publisher:
PEARSON
Database Systems: Design, Implementation, & Manag…
Database Systems: Design, Implementation, & Manag…
Computer Science
ISBN:
9781337627900
Author:
Carlos Coronel, Steven Morris
Publisher:
Cengage Learning
Programmable Logic Controllers
Programmable Logic Controllers
Computer Science
ISBN:
9780073373843
Author:
Frank D. Petruzella
Publisher:
McGraw-Hill Education